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Portati a casa il ir 


Avvic inati all’Europa con 
16 NUOVI FANTASTICI CANALI 
VI A SATELLITE. 

Ecco cosa puoi ricevere subito a casa 
tua direttamente dallo spazio con un 
tocco di telecomando: 


S CREEN SPORT : dirette sport dal 



mondo, 24 ore su 24; in lingua inglese, 
francese, tedesca e spagnola. 

GERMAN PROGRAM: programmi 
SAT e SAT 2, in tedesco. 

T.ANDSCAPE : immagini dal mondo e 
musica per 8 ore; in inglese. 

SCANSAT: film, notizie, sceneggiati 16 
ore su 24; in svedese, norvegese, 
danese e inglese. 

D ISNEY CHANNEL : film, cartoni, 18 
h su 24; in inglese. 

I.IFESTYLE : telenovelas, cucina, mo¬ 
da, per 8 ore; inglese. 

KJNDERNET : programmi per bambi 
ni, 8 ore su 24; in francese, tedesco e 
spagnolo. 


S CANSAT : film, commedie, varietà, 14 
ore su 24; in svedese, norvegese, 
danese. 

S KY CHANNEL : film, commedie, 
sport; notizie; 24 ore su 24; in inglese. 

F. UROSPORT : dirette sport dal mon 
do, 18 ore su 24; in inglese e tedesco. 

F ILMNET : film, 24 ore su 24; in 
inglese. 

S KY NEWS : TG in diretta ogni 30 • 
minuti da U.K., U.SA, NBC 24 ore su j 
24; in inglese. 

SKYARTS: opere, balletti, film, 10 ore 
su 24; in inglese. 

MTV : videoclip; notiziari, musical, 24 
ore su 24; in inglese. 

































EZIONE TV VIA SATELLITE 



S KY MOV1ES : film, 18 ore su 24; in 

inglese. 

F ACILE, PIACEVOLE, 

ENTUSIASMANTE. 

• Il modo più piacevole e diretto per 
imparare e migliorare la conoscenza 
delle lingue. 

• Le dirette sportive più entusiasmanti 
da tutto il mondo. 

• Semplice da installare: non richiede 
l’intervento del tecnico, la sistemi 
dove vuoi. L’ingombro è minimo. 

• Facile da utilizzare: il ricevitore è 
predisposto per il collegamento a 
qualsiasi televisore e i 16 canali sono 
già presintonizzati. 


N ATURALMENTE 
PREZZI AMSTRAD. 

Ecco le configurazioni, complete di 
manuale italiano. 

SRX 200 D60: antenna parabolica dia¬ 
metro 60 cm., ricevitore stereo 16 canali 
preselezionati, telecomando, accessori 
per fissaggio: L 899.000 IVA inclusa; 
SRX 200 D80: kit come precedente ma 
con antenna parabolica da 80 cm. di 
diametro: L 1.099.000 IVA inclusa. 
IMPORTANTE! Chiedi al rivenditore 
Amstrad per antenna satellitare (SAT) la 
configurazione migliore per la tua 
zona. 

T ,I TROVI QUI 

Presso tutti i negozi Expert e tutti gli 


altri centri autorizzati SAT, dove troverai 
maggiori informazioni. Cercali su “Am 
strad Magazine”, in edicola. Oltre 150 
Centri di Assistenza Tecnica. 

P RONTO AMSTRAD 
Telefona allo 02 26410511 o scrivi a: 
Casella Postale 10794 - 20124 Milano. 
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by Amstrad 
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Max Run protetto 



Sono un vostro appassionato lettore e possie¬ 
do un C64 con registratore a cassetta. Vorrei 
dei chiarimenti riguardo la routine "MAX 
RUN" pubblicata su List 1/2 1989, di Federico 
Maranca. 

Sebbene io abbia seguito le istruzioni alla let¬ 
tera, il programma si cancella e il sistema ope¬ 
rativo si blocca. 

Qual è il significato della frase nell'articolo 
"senza virgola 1", scritta tra parentesi. 

Vorrei sapere inoltre il nome di un buon as¬ 
semblatore per il mio computer. 

Giovanni Grassi - Napoli 

La soluzione del suo problema è molto sempli¬ 
ce: la routine in questione funziona esclusiva- 
mente con il drive per floppy disk, come si 
evince nel corso dell’articolo dal fatto che bi¬ 
sogna digitare l’istruzione SAVE "nome pro¬ 
gramma",8 (il numero 8 finale si riferisce al 
salvataggio su disco). 

La frase incriminata vuole dire che non si deve 
inserire al termine del comando di SAVE l’op¬ 
zione “ t T come nel caso seguente: 

SAVE "nome programmaci 

Cogliamo l’occasione per specificare che il 
programma salvato con l’ausilio della routine 
MAX RUN PROTETTO, dovrà essere caricato 
esclusivamente con il seguente comando: 

LOAD "nome programma",8,1 

Per ciò che riguarda l’assemblatore, possiamo 
consigliarle l’ottimo MON 64, in versione car¬ 
tuccia. 


Il Basic dell'Olivetti Prodest PCI tv 

Sono vostro lettore da molto tempo e sono in 
possesso di un OLIVETTI PRODEST PCI. Pro¬ 
grammando con il GW- BASIC mi è sorto un 
problema: è possibile trasformare un file BA¬ 
SIC in un file del tipo ".EXE" o “.COM" in mo¬ 


do da poterlo direttamente caricare ed esegui¬ 
re dal sistema operativo? 

Sicuro della vostra collaborazione, vi auguro 
un buon lavoro per quest'ottima rivista. 

Luca Piotto - Vicenza 

Esistono due modi per far eseguire un pro¬ 
gramma Basic direttamente da DOS. Il primo si 
ottiene "compilando" il programma: con que¬ 
sto procedimento otterrete un programma in 
linguaggio macchina (quindi notevolmente 
più veloce) di tipo ".EXE". Per far questo è ne¬ 
cessario un compilatore compatibile con il 
GW-BASIC, ad esempio l'ottimo Turbo Basic 
della Borland. 

Una volta ottenuto il programma eseguibile, 
esso sarà completamente “autosufficiente”, 
nel senso che non necessiterà per partire ne 
del GW-BASIC, ne del compilatore Turbo Ba¬ 
sic. 

Il secondo metodo, invece, è molto più sbriga¬ 
tivo e non richiede software aggiuntivo, seb¬ 
bene produca solo una simulazione di pro¬ 
gramma direttamente eseguibile. 

Consiste nel creare (utilizzando, ad esempio, 
l’EDUN dell’MS-DOS) un file BATCH, ovvero 
un file con estensione ".BAT". 

Immaginiamo che il programma basic si chia¬ 
mi "PIPPO.BAS" e si voglia farlo partire diret¬ 
tamente da DOS. 

Chiameremo allora il file batch “PIPPO.BAT", 
e dovrà essere costituito da un’unica linea: 

GWBASIC PIPPO 

A questo punto sarà sufficiente digitare da si¬ 
stema operativo il comando PIPPO, e automa¬ 
ticamente il programma basic verrà caricato e 
lanciato. 


dard MSX1 e 2, magari con qualche confron¬ 
to. 

Cordiali saluti. 

Fabio Bisesti - Napoli 

L'estensione Basic di un MSX 2 rispetto al suo 
primo standard è molto rilevante. Infatti un 
modello MSX 2 ti offre fra l’altro: 4 nuovi 
SCREEN per la grafica con 256 colori per lo 
screen 8 riversabili contemporaneamente sul 
video e con uno screen 7 dalla risoluzione 
512x212. 

Per il testo si arriva alle 80 colonne di caratteri, 
puoi utilizzare lo MSX-DOS, gli sprites poten¬ 
ziati (multicolore), diverse pagine video dello 
stesso screen, usare l’istruzione COPY per tra¬ 
sportare blocchi di immagine, utilizzare il 
mouse, avere l’orologio incorporato, la data, 
una chiave d’accesso solo tua, nonché 128 K 
di VRAM e altrettanti di RAM. 

Per finire trovi pure la presa scart, 2 slot per 
cartucce e il disk drive incorporato. Un ottimo 
modello di MSX 2 è l’NMS 8245 della Philips. Se 
poi vuoi andare oltre, con poca spesa in più, 
trovi l’NMS 8280, sempre della PHILIPS, che ti 
offre uno splendido digitalizzatore video per 
moltissime applicazioni. Ma puoi sempre 
aspettare che esca sul mercato il nuovo MSX 
3, che dovrebbe possedere più di 1000 colori ! 


Programmi matematici 



Sono un possessore di un Personal System 
IBM PS2/30 e vorrei chiedervi se potreste pub¬ 
blicare sulla Vostra Rivista dei programmi ma¬ 
tematici per il Sistema Operativo MS-DOS. 
Cordiali saluti. 


Informazioni tecniche MSX 



Sono un vostro assiduo lettore da ben 3 anni 
ed ho apprezzato molto il nuovo formato del 
vostro rotocalco. 

lo posseggo uno standard MSX 1 e vorrei ave¬ 
re delle informazioni tecniche sia sullo stan- 

t 


Stefano Samele - Pavia 

Come avrà sicuramente notato, LIST nell'ulti¬ 
ma pagina dell’inserto programmi staccabile, 
riporta un elenco di programmi pubblicati, 
classificati per macchina. Se presta uno 
sguardo all’elenco di programmi per MS-DOS, 
potrà constatare che software matematico è 
già stato sviluppato: 
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POSTA 


Equazioni di secondo grado - 6/1988 
Studio di funzioni - 9/1988 
Risoluzione di sistemi - 3/1989 
e, per gli appassionati, un programma di grafi¬ 
ca a 3 dimensioni: 

SUPERGRAPHIC 3D - 5/1988. 

Speriamo che quanto sopra sia di Suo gradi¬ 
mento. La invitiamo comunque ad inviarci 
nuove idee e/o programmi per incrementare la 
nostra biblioteca di software matematico. 


PC 128 e Telematica 



Spettabile rivista LIST, purtroppo non posso 
adoperare l'adattatore telematico Commodo¬ 
re poiché risulta essere incompatibile con il 
mio computer: OLIVETTI PRODEST PC 128. 
Vorrei sapere se esiste e se è possibile procu¬ 
rarsi un adattatore telematico compatibile con 
il PC 128. 

Ringrazio e porgo distinti saluti. 


Padovani Moreno - Mantova 


Galeotta fu la stampante 



Sono un vostro assiduo lettore di 16 anni e 
posseggo un MSX 2. Scrivo per avere un 
chiarimento a proposito del programma 
“Computer Ritratti ", pubblicato sul numero 
1211988. 

Sebbene abbia controllato più volte il lista¬ 
to, la riga 180 produce un errore del tipo 
"MISSING OPERAND”. Potreste spiegar¬ 
mene il motivo? 

Marco Antonelli - Rieti 

Sebbene sia stato già fatto rilevare da una 
errata corrige, ribadiamo che nel listato 
“Computer Ritratti” un inconsueto salto 
della stampante ha privato di un carattere 
la linea 180 da lei citata. Tale carattere è la 
cifra 1 (uno) e si tratta quindi di digitare l’i¬ 
struzione FM = 1 assieme al resto della li¬ 
nea. 

Avendo già severamente punito la stam¬ 
pante (con stampe in ASCII a una colon¬ 
na!), non ci rimane che scusarci con i letto¬ 
ri. 


(quanto costa e se si deve pagare una so¬ 
pratassa). 

Andrea Salomoni - Gorogonzola (MI) 

Per il primo quesito le consigliamo di utiliz¬ 
zare la routine MAX RUN PROTETTO di Fe¬ 
derico Maranca, pubblicata sul numero 
1-2/1989, che fa molto di più di quanto lei 
desidera (lo verificherà con i suoi stessi oc¬ 
chi!). 

Il più economico Modem per C64 è il TAHIA- 
HO, che costa meno di 150.000 lire. Ovvia¬ 
mente non si aspetti prestazioni ecceziona¬ 
li, considerando la cifra irrisoria. Per l’utiliz¬ 
zo è necessario denunciare alla Sip l’avve¬ 
nuto acquisto del Modem e le sue specifi¬ 
che tecniche. La società telefonica provve¬ 
der all’installazione di un commutatore di 
linea e richiederà il pagamento del canone 
bimestrale di circa 35.000 lire. 


Commodore 128 e Ars 



Ci spiace molto che abbia fatto una spesa inu¬ 
tile acquistando un adattatore telematico 
Commodore, sarebbe stato meglio verificare il 
funzionamento ed i contatti per la possibile 
compatibilità e poi effettuare la spesa. 
Comunque crediamo che per il momento non 
ci sia nulla del genere in commercio per il PC 
128. tantomeno interfacce modem, seriali e 
programmi di comunicazione. 


Protezione di programmi 



Spett. Redazione di LIST, sono un possessore 
del PC 128 Olivetti PRODEST. 

Nel LIST di Gennaio/Febbraio 1989, tra le let¬ 
tere pubblicate, una mi ha incuriosito partico¬ 
larmente: "TRUCCHI E CULTURA”, dove si 
parla di sbloccare programmi protetti con 
l'opzione SAVE",P. lo ho tentato di proteg¬ 
gere qualche mio programma con quella op¬ 
zione, ma la macchina non l'accetta. Che op¬ 
zione posso usare per proteggere un mio lista¬ 
to? 

Marco Cozzarli - Brescia 


Non capiamo come mai lei trovi difficoltà a 
proteggere i suoi programmi con un’ istruzio¬ 
ne che è spiegata dettagliatamente sul ma¬ 
nuale del PC-128, a meno che... È sicuro di 
non aver scritto una virgola di troppo, magari 
dopo F attributo “.P”? 


Come trasferire da nastro a disco 



Possiedo un computer MSX 2 PHILIPS NMS 
8245 ed ho molti programmi e giochi in LM 
per MSX 1 che non riesco a copiare da cas¬ 
setta a disco. Potreste scrivere una routine 
per effettuare questo tipo di copie? 

Mi congratulo vivamente per la vostra rivi¬ 
sta semplicemente eccezionale... 

Domenico Vigorito - Nocera Inferiore (SA) 

Per salvare programmi in LM da cassetta a 
disco, procedere nel modo seguente: cari¬ 
care da cassetta con BLOAD “CAS:nome 
file” e salvare quindi su disco con BSAVE 
“A:nome file”,indi,ind2,ind3 
dove indi rappresenta l’indirizzo iniziale, 
ind2 l’indirizzo finale e ind3 l'indirizzo di 
esecuzione. 

Il gioco è fatto! 


Protezione a prova di bomba 



Sono un nuovo abbonato alla vostra rivista, 
e vorrei saper come si protegge un pro¬ 
gramma per Commodore 64, in modo che 
premendo il tasto RUN STOP non si possa 
interromperne l'esecuzione. 

Vorrei inoltre che mi fornisse delle informa¬ 
zioni sul piu economico MODEM per C64 


Sono un possessore di un computer Com¬ 
modore C128 con disk drive modello 1570. 
Avevo sentito parlare di una novità nel 
campo della programmazione, da voi stu¬ 
diata e commercializzata, vorrei sapere: 

1) Il vostro nuovo linguaggio per program¬ 
mare in italiano, senza i limiti del BASIC, è 
applicabile al C128? 

2) Quali sono le effettive caratteristiche del 
linguaggio, dove lo si può trovare, su quali 
riviste è stato pubblicizzato? 

3) Nel caso sia applicabile, che riflessi e che 
limiti ha verso le periferiche del C128, disk 
drive, stampante, ecc.? 

4) QuaTè il costo del tutto? 

Grato dell'attenzione e certo della risposta, 
porgo i miei più cordiali saluti. 

Giancarlo Pasini - Rimini 

Egregio Ing. Pasini,siamo spiacenti di infor¬ 
marla che la versione del nuovo linguaggio 
interamente in italiano, l’ARS, è stato scritto 
esclusivamente per gli ambienti MS-DOS, 
quindi Personal Computer IBM e compati¬ 
bili dotati di Hard Disk. 

Del resto risulta praticamente impossibile 
farlo girare su un Commodore 128. 
Comunque per ulteriori dettagli in merito al 
linguaggio, le forniamo i numeri delle riviste 
ove si parla di questo software: 

Settembre. Ottobre, Novembre 1988, numeri 
9-10-11. ■ 
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dal mondo informatico 



convigno 

ANNUALE 
UNIX 1989 



Anche quest’anno il convegno organiz¬ 
zato dalla “i2u" (Italian Unix System 
User Group), che si terrà al Centro Con¬ 
gressi di Milanofiori, nei giorni 7, 8, e 9 
Giugno, sarà articolato in tre distinte fa¬ 
si che si intersecano fra di loro: tutorial 
(il primo giorno), conference (secondo e 
terzo giorno), exhibition (tutti e tre i gior- 
ni). 

Nell’ambito delle conferenze il panora¬ 
ma si preannuncia ghiotto ed interes¬ 
sante: tra i relatori interverranno membri 
delle Università di Genova, di Berkeley, 
Carnegie Mellon e di molte aziende lea¬ 
der del settore appartenenti alla Open 
Software Fondation. 

Per ciò che riguarda l’esposizione, il 
convegno 1989 offrirà una rassegna 
completa di quanto è oggi disponibile in 
Italia nel mondo Unix, grazie alla parte¬ 
cipazione di rivenditori, costruttori e 
software house. 

Particolare che rende ulteriormente in¬ 
teressante la manifestazione è la possi¬ 
bilità offerta agli sponsor di collegamen¬ 
to tra sistemi diversi su base Ethernet, 
NFS, X WINDOW, TCP-IP. Si potranno 
così dimostrare l’efficacia e il gran nu¬ 
mero di applicazioni possibili con il col- 
legamento tra sistemi di diversa conce¬ 
zione. 



AlS-VIEW 


La Microdata System di Lerici annuncia la 
disponibilità del Software ALS-VIEW un 
potente editor grafico per File di Fotoplot- 
tatura in formato GERBER (RS274) 


ALS-View permette di visualizzare il file for¬ 
mato Gerber su video grafico a colori, di ef¬ 
fettuare modifiche e controlli prima della fo- 
toplottatura. 

Il programma ALS-VIEW è un versatile stru¬ 
mento, facile da utilizzare, basato su menu 
discendenti che permette di ottimizzare la 
fotoplottatura ed eliminare costosi errori. 
Tramite un modulo opzionale si possono 
utilizzare e modificare file di formato diver¬ 
so dal GERBER ed effettuare la conversione 
fra due standard. 

ALS-VIEW permette inoltre di eseguire il plot 
di un file GERBER su stampante grafica! 

Il programma permette di stampare il ma¬ 
ster su stampanti grafiche ad alta risoluzio¬ 
ne (330 punti per pollice) quali le stampanti 
laser o le nuove Hewlett Packard DESKJET 
a getto d’inchiostro. 

Utilizzando questa tecnica si può avere una 
uscita di alta qualità senza dovere eseguire 
la fotoplottatura. 

ALS-VIEW è il programma ideale per com¬ 
pletare una stazione computerizzata di 
CAD-PCB 

È compatibile con i più diffusi software di 
PCB in quanto utilizza il formato standard 
più diffuso: GERBER. 

CARATTERISTICHE DEL PROGRAMMA 

- Semplicità d’uso, il programma è basato 
su mouse e menu a tendina e ricalca l’inter¬ 
faccia utente dei programmi ORCAD. 

- Lavora con Personal Computer: XT, AT o 
compatibili con almeno 384 K RAM ed un 
display a colori (EGA o VGA). 

- Accetta file di formato GERBER (RS 274) 
prodotti dai più diffusi programmi di 
CAD-PCB. 



- Visualizza file di piotatura su video grafi¬ 
co, con possibilità di zoom e autopan. 

- Modifica del master con possibilità di ag¬ 
giungere, cancellare, spostare, copiare e 
modificare i vari elementi quali: piste, piaz- 
zole e fori passanti. 

- Possibilità di posizionare sulla stessa pelli¬ 
cola vari master tramite le funzioni di: spo¬ 
stamento, taglio, copie e rotazione. 

- Possibilità di replicare sulla stessa pellico¬ 
la più copie dello stesso master in array 
N*M. 

- Conversione di file di formato differente. 

- Crea e stampa un file con le informazioni 
per la foratura (Drill Template). 

- Misura della distanza e isolamento. 

- Interfaccia verso stampanti grafiche: HP 
laserjet II, HP DeskJet, EPSON, NEC, ecc. 

- Possibilità di marcare i fori sul disegno in 
stampa per estrarre le informazioni per il 
Drill. 

Il programma per le sue alte prestazioni è 
uno strumento indispensabile per chi ha un 
fotoplotter. 

È anche uno strumento valido per chi utiliz¬ 
za un servizio di fotoplottatura esterno ma 
vuole effettuare una verifica ed ottimizza¬ 
zione del file prima di inviarlo al servizio 
esterno evitando così costosi errori. 


MICRODATA 
SYSTEM 
Via Matteotti, 50 
19032 Lerici (SP) 
Tel. 0187/966123 
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Il NO VITA 
DI PRIMA VERA 


di SIMONE MAJOCCHI 

Sul numero scorso abbiamo visto gli svi¬ 
luppi dei PC e delle Workstation, assieme 
ai passi da gigante compiuti dalle memo¬ 
rie di massa. Tutte queste innovazioni, 


sempre più definita e la produzione indu¬ 
striale di questi dispositivi per i portatili sta 
dando un notevole impulso a questo settore. 

LCD a colori 

Per questo tipo di prodotto la ricerca si sta 
svolgendo presso diverse case e i primi pro¬ 


dotti basati su questa tecnologia li cono¬ 
sciamo ormai tutti: dai piccoli televisori Ca¬ 
sio e Panasonic ai mini monitor Sony e Sa¬ 
ba. La corsa ai “pollici” però non si ferma e 
i prodotti come il Videotelefono OKI utilizza¬ 
no già display da ben cinque pollici. Il pro¬ 
blema di fondo per questo tipo di visori ap¬ 
plicati al settore informatico è determinato 


con macchine sempre più flessibili e po¬ 
tenti, hanno stimolato la produzione di di¬ 
splay sempre più sofisticati con notevole 
beneficio per le applicazioni di CAD e 
DTP. Anche i mouse e gli scanner seguono 
questa nuova spinta del mercato con nu¬ 
merose novità. Vediamo quindi quali so¬ 
no le nuove proposte per questi settori 


Seconda parte 

MONITOR E DISPLAY 


LCD VGA - Cirrus Logic 

più attenti al mercato delle 
schede grafiche avranno già 
riconosciuto questo nome, 
noto per la produzione di 
chip dedicati. Quest’anno, 
seguendo la tendenza verso lo standard 
VGA, hanno presentato un controller per 
display a cristalli liquidi dedicato al cre¬ 
scente settore dei portatili. Dopo la massic¬ 
cia comparsa dei laptop a LCD in grado di 
visualizzare in toni di grigio lo standard 
EGA ecco quindi il passo successivo. La ri¬ 
soluzione ha però un costo e il solo visore 
LCD porta un sensibile aumento al prezzo 
dei portatili. La strada per i display piatti è 




Le dimensioni dei computer diminuiscono continuamente mentre quelle dei monitor aumenta¬ 
no quasi di pari passo. Con 33 pollici di diagonale questi monitor Hitachi rendono giustizia alla 
grafica delle schede EGA e VGA. Una valida alternativa ai proiettori per conferenze e presenta¬ 
zioni. 
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Amiga 2000. 

Per te 

che vuoi 

lavorare 

con un creativo 

alla tua altezza. 


Amiga 2000 

Per te e per 
i tuoi progetti 
che non hanno 
bisogno solo 
del sistema 
MS-DOS. 


Amiga 2000. 


Per te 




- *mi~, 1 t _ . _ 1 Z. 


Amiga 2000 


Amiga 2000 è il collaboratore ideale 
per preparare facilmente ed in po¬ 
chissimo tempo al video testi e grafici 
e riportarli poi su carta, su lucidi o dia¬ 
positive. E uno strumento creativo 
semplice e immediato per realizzare 
soggetti fantastici in due o tre dimen¬ 
sioni con 4.096 colori. Qualunque sia 
la tua professione, con Amiga 2000 
hai a disposizione le meraviglie del¬ 
l’ambiente Amiga DOS e del sistema 
MS-DOS, con i quali potrai elabora¬ 
re i tuoi progetti con una grafica 
ineguagliabile. In più, Amiga 2000 è 
Commodore: un marchio leader nel 
mondo degli home computer e dei 
sistemi professionali. Non a caso il 
primo PC (P.E.T.) è stato prodotto 
da Commodore, che può così 
vantare la più lunga esperienza 
nel settore. 


MS-DOS e XENIX sono marchi registrati 
della Microsoft Ine. 

UNIX è un marchio registrato della AT&T. 

Commodore e Amiga sono marchi registrati 
della Commodore Ine. 


che vuoi 
un amico 
sulla 

scrivania. 


C’è un Commodore p 





























PC 10. 


PC 40. 


Per te 
che vuoi 
un personal 
che faccia 
scuola. 


Per te 

che vuoi lavorare 
solo con 
i numeri uno. 


PC 60. 

Per te 
che vuoi 
una gamma 
completa 
di soluzioni 
al servizio 
della tua 
Azienda. 



PC 


La linea PC Commodore garantisce 
nel mondo MS-DOS - grazie ai mo¬ 
delli XT, AT e 386 - la soluzione ad 
ogni problema. Il PC10 (XT) e PC20 
(XT) rappresentano la soluzione idea¬ 
le di partenza. I modelli PC40 (AT) as¬ 
sicurano la potenza e l’espandibilità 
necessarie a soddisfare ogni esigen¬ 
za di crescita in qualunque settore. Il 
PC60 (386) - grazie alla sua potente 
architettura - è il top della gamma. 
Sui modelli PC40 e PC60 potrai in¬ 
stallare anche il sistema operativo Xe¬ 
nix® o Unix® se la tua azienda lo ri¬ 
chiede, e potrai inoltre collegarli in re¬ 
te. In più PC10, 20, 40, 60 sono Com¬ 
modore: un marchio leader nel mon¬ 
do degli home computer e dei sistemi 
professionali. Non a caso il primo PC 
(P.E.T.) è stato prodotto dalla Com¬ 
modore, che può 
così vantare la 
più lunga espe¬ 
rienza nel settore. 


Per informazioni, dalle 14 alle 17,30 




er te, chiunque tu sia. , 



































Lombardia 


Milano 

• A’ION • Via Bigli, 11 

• AL RISPARMIO - V.le Monza, 204 

• B.C.S. - Via Montegani, 11 

• BRAHA ALBERTO ■ Via Pier Capponi, 5 

• EDI CARED • Via Pietro Calvi, 20 

• E.D.S. - C.so Porta Ticinese, 4 

• FLOPPERIA - V.le Montenero, 31 

• GI-SETTANTA - Via Burlamacchi, 4 

• GIGLIONI - V.le Luigi Sturzo, 45 

• LOGITEK • Via Golgi, 60 

• MARCUCCI • Via F.lli Bronzetti, 37 

• NEWEL - Via Mac Mahon, 75 

• SUPERGAMES • Via Vitruvio, 38 

• 68000 E DINTORNI - Via Washington, 91 

Provincia di Milano 

• ALL COMPUTER • Residenza Sassi, 312 - Mi¬ 
lano 3 - Basiglio 

• PENATI - Via Verdi, 28/30 - Corbetta 

• S.A.T. - Via Milano, 24 - Nerviano 

• IL CURSORE - Via Campo dei Fiori, 35 - No- 
vate Milanese 

Bergamo 

• DERCOM - Via Borgo Palazzo, 65/A 

Provincia di Bergamo 

• COMPUTER SHOP • Via V. Veneto, 9 • Ca¬ 
priate San Gervasio 

Brescia 

• MASTER INFORMATICA - Via F.lli Ugoni, 
10/B 

Provincia di Brescia 

• CAVALLI PIETRO • Via X Giornate, 14/B - Ca- 
strezzato 

• DATA SYSTEM NEW • Via Gramsci, 33 - Con¬ 
cesio 

• MEGABYTE - P.zza Maluezzi, 14 - Desenzano 
del Garda 

Provincia di Como 

• CIMA ELETTRONICA - Via Leonardo da Vin- 

C| ~J - [_0CCO 

• FUMAGALLI - Via Cairoli, 48 - Lecco 

• RIGHI ELETTRONICA • Via Leopardi, 26 - 01- 
giate Comasco 

Cremona 

• MONDO COMPUTER - Via Giuseppina, 11/B 

• PRISMA - Via Buoso da Dovara, 8 

Provincia di Cremona 

• EUROELETTRONICA - Via XX Settembre, 92/ 

A - Crema 

Provincia di Mantova 

• CLICK - ON COMPUTER - S.S. Goietese, 168 - 
Goito 

Pavia 

• POLIWARE - C.so Carlo Alberto, 76 

Provincia di Pavia 

• LOGICA MAINT - Via Montegrappa, 32 - Vi¬ 
gevano 

Provincia di Sondrio 

• FOTONOVA - Via Valeriana, 1 - San Pietro di 
Berbenno 

Varese 

• IL CENTRO ELETTRONICO - Via Morazzo- 
ne, 2 

• SUPERGAMES - Via Carrobbio, 13 


Provincia di Varese 

• CURIO TRE - Via Ronchetti, 71 - Cavaria 

• J.A.C. NUOVE TECNOLOGIE - C.so Mat¬ 
teotti, 38 - Sesto Calende 


Piemonte 


Cuneo 

• ROSSI COMPUTERS - C.so Nizza, 42 

Provincia di Cuneo 

• PUNTO BIT - C.so Langhe, 26/C - Alba 

Novara 

• SOFTEAM - Via Locchi, 6 

Provincia di Novara 

• L.A.E. SOFTWARE - C.so Cavour, 46/59 - 
Arona 

• ALL COMPUTER - C.so Garibaldi, 106 - 
Borgomane- ro 

• ELLIOTT COMPUTER SHOP - Via Don Min- 
zoni, 32 - Intra 

Torino 

• ALEX COMPUTERS - C.so Francia, 233/4 

• DE BUG COMPUTER - C.so Vittorio Ema¬ 
nuele II, 22 

• DESME UNIVERSAL - Via San Secondo, 
95 

• IL COMPUTER - Via Nicola Fabrizi, 126 

• STAF - C.so Regina Margherita, 97 

Provincia di Torino 

• DIAM INFORMATICA - C.so Francia, 146 
BIS - Cascine Vica - Rivoli 

Provincia di Vercelli 

• C.S.I. TEOREMA - Via Losana, 9 - Biella 

• CHIP - Via Martiri della Libertà, 47 - Cos- 
sato 


Veneto 


Belluno 

• UP TO DATE - Via Vittorio Veneto, 43 

Padova 

• SARTO COMPUTER - Via Armistizio, 79 


Trentino Alto Adige 


Bolzano 

• COMPUTER POINT - Via Roma, 82 

Provincia di Bolzano 

• ELEKTRO TAPPEINER - P.zza Principale 
90 - Silandro 

Trento 

• CRONST - Via G. Galilei, 25 


Friuli Venezia Giulia 


Pordenone 

• SIEL - Via Colonna, 45 

Udine 

• CO.R.EL ITALIANA - Via Tavagnacco, 91 

• MOFERT 2 - Via Leopardi, 21 


Liguria 


Genova 

• ODEL • Via Orsini, 4 R 

cambia 


• SALS INFORMATICA - Via G. D’Annun¬ 
zio, 2 


Emilia 


Bologna 

• MINNELLA ALTA FEDELTÀ - Via Mazzini, 
146/2 

• SINOPIA INFORMATICA - V.le Pietramella- 
ra, 11 

Provincia di Bologna 

• S.C. COMPUTERS - Via Enrico Fermi, 4 - 
Castel San Pietro 

• S.P.E. INFORMATICA - Via di Mezzo 
Ponente, 385 • Crevalcore 

Modena 

• VIDEO VAL WILLY COMPUTERS - Via Ca¬ 
naletto, 223 

Provincia di Modena 

• NEW MEDIA SYSTEM - Via Roma, 281 - 
Soliera 

Parma 

• NEW LIST COMPUTER - Via Nazario 
Sauro, 9 

Reggio Emilia 

• COMPUTERLINE - Via San Rocco, 10/C 

• POOL SHOP - Via Emilia S. Stefano, 9/C 


Romagna 


Repubblica di San Marino 

• A.C.S. - Via Nonagualdaria - Cailungo 

Ferrara 

• BUSINESS POINT - Via Carlo Mayer, 85 

Provincia di Forlì 

• TOP BIT - Via Veneto, 12 - Forlimpopoli 

• EASY COMPUTER - Via Lagomaggio, 50 - 
Rimini 

• NUMERO - Via Battagliò, 21 • Rimini 

Provincia di Ravenna 

• E.T.S. - Via Saffi, 1 • Alfonsine 

• P.LZ. INFORMATICA - P.zza Sercognam, 
6 - Faenza 


Toscana 


Arezzo 

• DELTA SYSTEM - Via Piave, 13 

Firenze 

• M.T.S. DISTRIBUZIONE - Via di Novoli, 64 
A 

• TELEINFORMATICA TOSCANA - Via Bron¬ 
zino, 36 

Grosseto 

• COMPUTER SERVICE - Via Dell’Unione, 2 

Livorno 

• ETÀ BETA COMPUTER - Via S. Francesco, 
30 

• FUTURA 2 - Via Cambini, 19 

Provincia di Lucca 

• IL COMPUTER - V.le Colombo, 216 - Lido 
di Camaiore 

Pisa 

• ELECTRONIC SERVICE - Via della Vecchia 
Tranvia, 10 

Pistoia 


Siena 

• RENATO BROGI - P.zza Gramsci, 28 

Provincia di Siena 

• ELETTRONICA di BIFOLCHI - Via di Goccia¬ 
no nel Corso, 111 - Montepulciano 

• ELETTROMERCATO di BURRINI - Via Tosca¬ 
na, 6 - Monteriggioni 


Umbria 


Perugia 

• MIGLIORATI - Via S. Ercolano, 3 

• STUDIO SYSTEM • Via R. D’Andreotto, 49/ 
51 


Lazio 


Roma 

• D.R.R. - Via Giovanni Giorgi, 6 


Abruzzo 


Teramo 

• MAX CENTER - V.le Crispi, 68 


Puglia 


Bari 

• ARTEL - Via Guido d'Orso, 9 

• COMPUTERÀ ARTS - V.le Meucci, 12/B 

• ELETTRONICA SISTEMI - V.le della Repub¬ 
blica, 67/69 

• PAULICELLI SABINO & FIGLI • Via Fanelli, 
231/C 


Campania 


Napoli 

• DARVIN • Calata San Marco, 25 

• DPC INFORMATICA - Via E. Nicolardi, 129 

• GENERAL COMPUTERS - Via Bernini, 101 

• SPY - Via Domenico Fontana, 135 

• TOP VIDEO - TOP COMPUTER - Via S. Anna 
dei Lombardi, 12 

Provincia di Napoli 

• ITALIANA SOFTWARE - Via Zara, 11 - Acerra 

• NUOVA INFORMATICA SHOP - Via Libertà, 
185 - Portici 

Provincia di Salerno 

• COMPUTER WORLD - Via Quarto, 6 - San 
Marzano sul Sarno 


Calabria 


Cosenza 

• SIRANGELO COMPUTER - Via N. Parisio, 25 

Reggio Calabria 

• CONTROL SYSTEM - Via S. Francesco da 
Paola, 49/D-E 

• SYSTEM HOUSE - Via Fiume ang. Palesa¬ 
no, 1 

Provincia di Reggio Calabria 

• COMPUTER SHOP - Via Matteotti, 48/50 - 
Locri 


Sicilia 


Provincia di Enna 

• ITALSOFT - Via Dottor Palazzolo - Agira 

Palermo 

• C.H.P. - Via Libertà, 95 


• ELECTRONIC SHOP - Via degli Scalzi, 3 


in Commodore 


Esigi sempre la garanzia della Commodore Italiana S.p.A. 


Elenco aggiornato al 3 Aprile 1989 



















ATTUALITÀ 



visualizzazione in formato reale dei docu¬ 
menti creati con Ventura Publisher, Aldus 
Pagemaker ecc. senza flicker e con risolu¬ 
zioni astronomiche (per noi abituati a 600 
punti come risoluzione eclatante). Rispet¬ 
tando le risoluzioni inferiori, entrambi i mo¬ 
nitor permettono la visualizzazione in mo¬ 
nocromatico di MDA, Hercules e CGA. 

Big screen - Mitsubishi 

Dal monocromatico al colore: in casa Mit¬ 
subishi i due nuovi nati, l’XC-3320C e l’XC- 
3715, cercano di sottrarre terreno ai si¬ 
stemi a proiezione con ben 33 e 37 pollici 
di diagonale. Ovviamente questi due moni¬ 
tor sono capaci di sincronizzarsi con tutte 
le più diffuse schede video, dalla CGA alla 
VGA. e prevedono anche l’ingresso video 
composito in NTSC. PAL e SECAM. Con un 


Anche il telefono si evolve con la comparsa di 
schermi a cristalli liquidi, tastiera alfanumerica 
e funzioni sofisticate. Il disco combinatore or¬ 
mai è stato seppellito nel cimitero dei dispositi¬ 
vi obsoleti dopo essere stato rimpiazzato da cir¬ 
cuiti digitali con ogni sorta di automatismo. An¬ 
che per questo apparecchio il manuale d'istru¬ 
zioni è diventato indispensabile. 

dalla corsa incessante per l’aumento della ri¬ 
soluzione delle schede video, quindi il massi¬ 
mo della tecnologia LCD riesce a malapena 
a visualizzare lo standard CGA, mentre il PC 
piu scarso è ora proposto perlomeno con 
una EGA. Il costo del solo visore è poi ancora 
molto elevato: ne è una dimostrazione il por¬ 
tatile Hitachi (HL400) che ha una differenza 
di prezzo fra il modello colore e bianco/nero 
di circa due milioni e mezzo. Forse è proprio 
la tecnologia impiegata che comporta troppi 
problemi a livello costruttivo e progettuale per 
il raggiungimento di dimensioni e risoluzione 
adeguata ai nuovi standard di presentazione 
grafica, quindi riteniamo che sia necessaria 
qualche nuova soluzione tecnologica per po¬ 
ter riallineare display e schede grafiche. Co¬ 
munque, mai dubitare dell’inventiva nip¬ 
ponica... 

Big screen - Etap 

Aumenta la risoluzione ed aumentano an¬ 
che le dimensioni del video. Il sogno di tutti 
coloro che usano quotidianamente il DTP è 
sicuramente un monitor capace di visualiz¬ 
zare in formato 1:1 le pagine A4 o A3. Que¬ 
sta casa belga propone quindi due monitor 
a fosfori bianchi dedicati ai fanatici del WY¬ 
SIWYG (What You See Is What You Get). 

Compatibili sia con il mondo MS-DOS Che p er // DTP non c ’è n j ente di meglio che un monitor monocromatico in formato A3 o A4. La 

quello Mac, sono la soluzione ideale per la ETAP propone / due modelli Neftis e Atris per applicazioni sia MS-DOS che Mac. 
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monitor da quasi un metro è possibile risol¬ 
vere egregiamente tutti i problemi di visua¬ 
lizzazione durante riunioni e presentazioni, 
con ottima luminosità e senza problemi di 
taratura. Un telecomando permette il con¬ 
trollo delle funzionalità del monitor a di¬ 
stanza completando questi due modelli. 


Sempre da Hitachi una nuova serie di moni¬ 
tor dedicati al CAD/CAM; la risoluzione e la 
precisione dei CRT è stata ulteriormente mi¬ 
gliorata per garantire il perfetto allineamen¬ 
to anche nelle zone periferiche del monitor. 
Per queste applicazioni è molto importante 
l’assenza di deformazioni e disallineamenti 
in quanto è necessario poter individuare a 
video le imprecisioni nei disegni prima di 


procedere al plottaggio su carta, che richie¬ 
de tempi anche lunghi, evitando di dover ri¬ 
fare più volte la stampa stessa. 

Trinitron - Sony 

La brillantezza dei colori e la perfezione 
delle immagini prodotte da questi CRT so¬ 
no da anni considerate come il punto di ri¬ 
ferimento. Dopo la diffusione in ambiente 
domestico e professionale (video), la Sony 
ha pensato di realizzare una serie di moni¬ 
tor a colori da 17 e 20 pollici. Il Mac II ad 
esempio prevede la configurazione a colori 
con questi monitor e molte nuove macchine 
sono proposte con un Trinitron da 17 polli¬ 
ci. La risoluzione di entrambi i tipi arriva a 
1280 per 1024 punti. Anche se sono molte le 
case che propongono monitor di pari di¬ 
mensioni e risoluzione, questi display van¬ 
no visti per poter apprezzare appieno l’ef¬ 
fettiva resa. 

DESK TOP PUBLISHING 


Adobe 

Da quando alla fine degli anni 70 John 
Warnock e Charles Geschke hanno iniziato 
a scrivere un programma in grado di mani¬ 
polare testi e grafica anche complessi per 
la stampa su laser printer ad oggi, il Desk 
Top Publishing è diventato una delle appli¬ 
cazioni più promettenti per il settore dei 
Personal Computer. Dopo la realizzazione 
dell’interprete PostScript, la cui prima ver¬ 
sione risale al 1984. la Adobe ha prodotto 
dei pacchetti per Mac e IBM studiati apposi¬ 
tamente per trarre pieno vantaggio dalla 
flessibilità di questo interprete. Il primo ad 
essere introdotto è stato Adobe lllustrator 
88 per Macintosh ed ora è disponibile an¬ 
che la versione sotto MS-DOS. La novità più 
interessante è però il pacchetto Adobe 
Streamline sempre per Mac. capace di tra¬ 
sformare le immagini di tipo bitmap in file 
per l’Illustrator (PostScript). La conversione 
permette di trattare l’immagine senza per¬ 
dere di risoluzione e apre la strada del trat¬ 
tamento deirimmagine con lllustrator (in¬ 
grandimenti, deformazioni, rotazioni ecc..) 
che non degrada la qualità deirimmagine, 
ma anzi la migliora. Un esempio di applica¬ 
zione di Streamline può essere l'incremento 
della risoluzione di un disegno in bianco e 
nero realizzato a video per la stampa su un 
depliant via fotounità: malgrado la risolu¬ 
zione limitata dell’originale, dopo la conver¬ 
sione otterremo sempre la risoluzione mas¬ 
sima indipendentemente dall’ingrandimento. 


Le nuove workstation grafiche sono ormai fornite con monitor a colori di tipo Trinitron. Ne è un 
esempio la Ustation, dotata di processore RISC per una capacità di elaborazione di 12 MIPS. A vi¬ 
deo la generazione in tempo reale di diversi Mandelbrot. 



tossir?] 


14 


LIST 6/89 















RICORDI H/1 Tchjmedès 

Buon lavoro, con la potenza del RISC! 



^System 






fa 


Distributore esclusivo: 




Acorn 


Cog 


The choice of experience 

Un'azienda del gruppo Olivetti 


G. RICORDI &C. 
Settore Informatico 
Via Salomone, 77 
20138 MILANO 
tei. 02/5082-315 


er maggiori informazioni, inviate questo coupon a G. RICORDI & 0 
Settore Informatico, Via Salomone, 77, 20138 MILANO 

Desidero avere maggiori informazioni su Archimedes 

Nome: 


Qualifica professionale: 

Ditta, Ente o Scuola : 
Indirizzo: 


> RISC: è il principio di Archimedes, lo straordinario e velocissimo personal computer a 32 bit D> Mettetelo alla 
prova con un foglio elettronico come SigmaSheet, 200 volte più rapido dei suoi simili (ricalcola un cash-flow di 32 
anni in meno di 25 secondi), o con un integrato come Pipe-dream (predisposto per comunicare con i portatili del¬ 
la nuova generazione), o con un project-manager versatile 
come Logistix, o con un database come System Delta Plus 
(che può gestire oltre due miliardi di records) D> Confrontate 
la potenza dei pacchetti di grafica, del software per appli¬ 
cazioni musicali, didattiche, scientifiche, mediche t> Valutate 
la facilità con cui sono state sviluppate soluzioni origi¬ 
nali e sofisticatissime nei vari linguaggi disponibili 
BBC Basic, Assembly, C, Pascal, Fortran 77, 

Lisp, Prolog) > Apprezzate la possibilità di conti¬ 
nuare a utilizzare tranquillamente i 
vostri pacchetti MS-DOS pre 
feriti I> Mai un computer 
così nuovo e rivoluzionario 
ha avuto tanto software 
così presto t> Ed è solo il 
principio. 


L0 «'*u» 

























sono al momento NeXT, IBM, DEC e Scitex. 


Sempre da Adobe continua la produzione 
di nuove fonti in formato PostScript: la libre¬ 
ria ha ormai raggiunto le 350 fonti. Per faci¬ 
litare la scelta sono anche proposte delle 
combinazioni di fonti selezionate da esperti 
per il miglior risultato a seconda del tipo di 
lavoro da eseguire. Questi tre package sono 
dedicati a “Newsletters”, “Forms & Schedu- 
les" e "Displays & Presentations". Oltre alle 
fonti ogni pacchetto contiene una guida su 
come realizzare al meglio il lavoro stilata da 
personaggi del mondo dell’editoria. 
Sempre a proposito di PostScript stiamo 
aspettando di poter vedere le prime imple¬ 
mentazioni del Display PostScript, un nuo¬ 
vo interprete studiato per la riproduzione a 
video di file PostScript con la stessa flessibi¬ 
lità e potenza della versione per stampante. 
Le aziende che anno accettato lo standard 


Logitech 

Dire mouse e dire Logitech è quasi la stessa 
cosa: questa azienda è leader nella produ- 




Questo Handy Scanner presentato dalla A4 combina le capacità classiche dello scanner con quelle 
di un programma grafico piuttosto eclettico. 


zione di mouse e la sua tecnologia si basa 
su otto anni di esperienza. Continuando 
nella politica del perfezionamento dei suoi 
prodotti, quest’anno propone un nuovo 
mouse confezionato con una serie di utility 
per la migliore integrazione con il software 
MS-DOS esistente. La risoluzione hardware 
è di 320 punti per pollice e via software è 
possibile variare la risposta anche secondo 
il nuovo metodo “balistico" che diminuisce 
la risoluzione (incrementando lo sposta¬ 
mento) proporzionalmente all’accelerazio¬ 
ne impressa al mouse. Il software fornito in¬ 
clude “Pop-Up DOS", una specie di Shell 
DOS a menu, e una trentina di menu mouse 
per gli applicativi più diffusi. Anche lo Scan- 
Man è stato migliorato, portando le presta¬ 
zioni a 400 punti per pollice di risoluzione 
(selezionabile oltre a 100,200 e 300 punti) e 
32 toni di grigio (tramite retinatura) oltre al¬ 
la lettura bianco/nero. La larghezza della fi¬ 
nestra di lettura è di 104 mm, ma con Paint- 
Show Plus è possibile combinare più letture 
in un’unica immagine tramite una opera¬ 
zione di “collage”. La praticità degli scan¬ 
ner "da mano” è ormai riconosciuta e in al¬ 
cune situazioni questo dispositivo è preferi¬ 
to rispetto ai tradizionali scanner in formato 
A4. Oltre a nuovi modelli di mouse e scan¬ 
ner, Logitec propone anche la nuova ver¬ 
sione di Finesse, la 2.0. Si tratta di un pac¬ 
chetto di Desk Top Publishing abbastanza 
sofisticato, ma di costo contenuto in grado 
di soddisfare le esigenze di DTP di piccole 
aziende ed uffici. Fra le particolarità di que¬ 
sta nuova versione c’è da segnalare l’inclu¬ 
sione di undici fonti in outline da utilizzare 
con il sistema Fontware Bitstream (fornito). 

A4 Scan 

Dal nome si potrebbe pensare ad uno 
scanner da tavolo e invece è l’ennesima ri¬ 
visitazione dell'handy scanner da parte di 
una azienda asiatica. La novità effettiva sta 
nella combinazione di uno scanner abba¬ 
stanza normale con un programma grafico 
di gestione capace di numerose acrobazie, 
fra cui ben settantadue possibili formati 
delle immagini per una compatibilità prati¬ 
camente totale con tutti i più diffusi pac¬ 
chetti in grado di utilizzare immagini. A tito¬ 
lo esemplificativo basti pensare che è con¬ 
templato anche il formato Fax in Gruppo III. 
Anche per questa applicazione è previsto il 
collage di parti di pagina per la ricomposi¬ 
zione deirimmagine originale. Sempre se¬ 
guendo la filosofia del pacchetto completo, 
in Image 72 troviamo anche la funzione di 
riconoscimento ottico dei caratteri (O.C.R.). 
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LA PRIMA RIVISTA ITALIANA 
DI TELEMATICA 


con tutte le informazioni per essere “on line” 
con il mondo. Telefax, telefonia, modem, 
satelliti, software e hardware per comunicare. 
Banche dati, servizi di informazione, prove ed 
esperienze. Modem e Telecomunicazioni, 
la password per il futuro. 











ATTUALITÀ 



li copiatore di immagini portatile della Chinon può riprodurre su carta, velocemente, quanto in¬ 
quadrato dall'obbiettivo. 



Il Chinon N-207 è uno scanner formato A4 dalla semplice tecnica costruttiva che, oltre ad una buo¬ 
na resa, offre un ridotto costo di mercato. 


Chinon 

I possessori di Amiga 2000 avranno ricono¬ 
sciuto in questo nome il produttore dei drive 
da tre pollici e mezzo forniti con la macchi¬ 
na, già citati nel numero scorso per il drive 
CD-ROM multifunzione. Per questa parte 
dedicata a scanner e simili Chinon torna al¬ 
la ribalta con due prodotti, sempre di costo 
contenuto, molto particolari. 

II primo, il DCM-206, è definito dalla casa 
stessa come "Portable Image Copier”, ov¬ 
vero copiatore di immagini portatile. Asso¬ 
miglia ad un proiettore, ma funziona al con¬ 
trario: si inquadra con il mirino l'immagine 
(bi o tridimensionale) da riprodurre e in cir¬ 
ca trenta secondi si ha la copia su carta di 
quanto inquadrato. L'ottica è di tipo auto¬ 
focus e utilizza un sensore CCD per lo scan 
dell’immagine. A prima vista può sembrare 
un gadget, ma basta ricordare la trasmis¬ 
sione “Conto su di te" di RA11 per afferrare 
l’utilità di questo dispositivo. Alcune case 
hanno prodotto delle lavagne in grado di ri¬ 
produrre quanto scritto sopra di esse trami¬ 
te un complicato meccanismo di lettura, 
ora con il DCM-206 è possibile copiare su 
carta il contenuto di qualsiasi lavagna ad 
un costo contenuto (circa 1.400.000 lire per 
il DCM e circa 100 lire per ogni copia pro¬ 
dotta). La stampa avviene su carta termica 
e può essere in reverse per copiare lavagne 
nere con scritte bianche. Oltre alla copia di 
lavagne, che avviene al tratto (senza sfu¬ 
mature, è prevista anche la modalità "sce- 
nery” che produce tramite retinatura anche 
i toni di grigio. L’unica pecca del DCM-206 
è la mancanza di una qualsiasi interfaccia 
per il collegamento a computer. 

Il secondo prodotto, l’N-207, è uno scanner 
A4 riinterpretato nella forma e nel funziona¬ 
mento dai progettisti Chinon. Assomiglia a 
un banco ottico e utilizza una "testa" di let¬ 
tura con un’ottica particolare per la lettura 
del documento. La risoluzione è variabile 
da 75 a 300 punti per pollice con la possibi¬ 
lità di dithering (retinatura) per i grigi. Fra le 
innovazioni che caratterizzano questo pro¬ 
dotto c’è l’assenza di una lampada di illu¬ 
minazione del documento e il metodo a 
specchio rotante e sensore lineare per la 
lettura. La semplicità costruttiva, che nulla 
toglie alla resa, si traduce in un costo ridot¬ 
to, un po' più di un milione, che porta que¬ 
sto scanner A4 ad essere il punto d’incon¬ 
tro fra gli handy scanner e gli A4 tradiziona¬ 
li. Nella documentazione si parla anche di 
spessore del documento fino ad un pollice, 
quindi è pensabile anche la ripresa di og¬ 
getti tridimensionali di spessore contenuto. 
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TELEWARE 

PROGETTI E PRODOTTI TELEMATICI 



L’INDUSTRIA ITALIANA AL SERVIZIO DI UNA COMUNICAZIONE DATI 
RAPIDA PRECISA E DI ALTISSIMA QUALITÀ. 


I MODEM OMOLOGATI 


MODELLO 

TIPO 

VELOCITÀ 

AUTOCALL 

TRASMISSIONE 

TW-M13S 

Esterno 

300FD/1200HD 

VIDEOTEL 

NO 

ASINC. 

TW-M12L 

Esterno 

300FD/1200FD 

HAYES 

ASINC. 

TW-M123 1 

Esterno 

300FD/1200FD 

1200HD/VIDEOTEL 

HAYES 

V.25BIS 

SINC./ASINC. 
MNP 4 

TW-M22BS 

Esterno 

1200FD/2400FD 

HAYES 

SINC./ASINC. 

PC-13 1 

Scheda XT/AT 

300FD/1200HD 

VIDEOTEL 

HAYES 

ASINC. 

PC-12 1 

Scheda XT/AT 

300FD/1200HD 

HAYES 

ASINC. 

PC-123 1 

Scheda XT/AT 

300FD/1200FD 

1200HD/VIDEOTEL 

HAYES 

SINC./ASINC. 

PC-22BS 

Scheda XT/AT 

1200FD/2400FD 

HAYES 

V.25BIS 

SINC./ASINC. 
MNP 4 

SY-123 1 

Scheda PS2 

300FD/1200FD 

1200HD/VIDEOTEL 

HAYES 

SINC./ASINC. 

SY-22BS 

Scheda PS2 

1200/2400FD 

HAYES 

SINC./ASINC. 

TLABOX 

Dispositivo di teleaccensione 





Ufficio Commerciale: Via Boscovich, 61 - 20124 MILANO - Tel. 02/29405791-656919 - Fax 225187 









ATTUALITÀ 




Questo scanner ad alta risoluzione della Microtek riproduce un foglio A4 in circa dieci secondi. 


Microtek 


avere ancora un saldo legame con le realtà 
di mercato rappresentano qualcosa che 
probabilmente verrà esteso e migliorato in 
tempi rapidi. 

TASTIERE 


Mentre numerose aziende propongono il 
mouse come miglior dispositivo per il collo¬ 
quio con i programmi, c’è qualcuno che si è 
accorto di quanto questo possa essere 
scomodo su piccole scrivanie. La proposta 
alternativa che giunge dai produttori asiati¬ 
ci è quindi una tastiera con una piccola 
trackball posizionata o al posto dei cursori 
o di fianco al tastierino numerico. Di per sé 
la trackball non è un’idea nuova, ma l’inse¬ 
rimento di questo dispositivo direttamente 
nella tastiera potrebbe anche rimettere in 
discussione il mouse, soprattutto per la 
maggior praticità d’impiego. La produzione 
di queste nuove tastiere è per il momento 
concentrata a Taiwan e probabilmente gli 
importatori di cloni attenderanno un po’ pri¬ 
ma di importare qualche pezzo, speriamo che 
si sbrighino per darci la possibilità di fare un 
effettivo confronto fra i due sistemi. 


Dopo tutte queste variazioni sul tema, ecco 
ricomparire dei dispositivi tradizionali sia 
per impostazione che per tecnologia. 
Dopo il successo dei primi modelli, distribui¬ 
ti anche sotto altri (ad esempio AST), que¬ 
sta azienda propone una nuova gamma di 
scanner A4 che va dal più semplice MSII al 
sofisticato MSF400-G. Il primo utilizza il me¬ 
todo a trascinamento del foglio ed è propo¬ 
sto come soluzione per testi (O.C.R.), grafi¬ 
ca (DTP) e applicazioni PC-Fax. La lettura 
di un foglio A4 avviene in circa dieci secon¬ 
di ed è possibile avere la retinatura per i gri¬ 
gi. I modelli intermedi, MSF-300 A C Q e QS, 
sono di tipo fiat bed ed aumentano nelle 
prestazioni fino ai 64 toni di grigio con sei 
bit a pixel. Ma è il modello di punta, MSF-400 
G, che rappresenta la nuova soluzione pro¬ 
fessionale Microtek: quattrocento punti per 
pollice, duecentocinquantasei toni di grigio 
(otto bit per pixel), scalatura dall’1% al 
100% in passi di una unità e possibilità di 
caricare retini ad alta risoluzione per la rap¬ 
presentazione dei grigi a 2540 punti. 

Con una simile gamma di prodotti la Micro¬ 
tek ha assicurato ai suoi clienti una soluzio¬ 
ne bilanciata per ogni esigenza. 

NUOVE IDEE 


Concludiamo la carrellata sulle novità pri¬ 
maverili con una serie di “idee” che senza 



La Hohe Eletto nics propone sofisticate tastiere per PC dotate di tasti LCD. 
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La tastiera MF 1.12 è uno dei prodotti di punta della casa tedesca. 


Più complessa è l’idea .sviluppata dal 
l’azienda tedesca Hohe Electronics: tastiere 
per PC dotate di tasti LCD. Il modello più 
semplice dispone solo della serie di tasti 
funzione in LCD mentre quella complessa 
ha un “minidisplay” per ogni singolo tasto. 
Via software è possibile scrivere su ogni ta¬ 
sto, rendendo visibile la configurazione del¬ 
la tastiera. Tutti i template dei tasti forniti 
con i programmi potrebbero quindi diven¬ 
tare dei file da scaricare sulla tastiera ren¬ 
dendo ancora più semplice l’utilizzo dei 
programmi stessi. L’idea è molto valida, ma 
non ci è stato possibile sapere il prezzo dei 
vari modelli. Qualche dubbio rimane sulla 
leggibilità delle scritte (problemi di contra¬ 
sto e risoluzione dei display) e sulla robu¬ 
stezza dei tasti. 

ACCESSORI PER MONITOR 


Dopo l’invasione degli schermi antiriflesso, 
qualcuno ha pensato di migliorare ulterior¬ 
mente la leggibilità dei monitor con un par¬ 
ticolare sistema di specchi. Il principio alla 
base dell’idea sta nell’eliminare lo stress 
causato dal continuo movimento degli oc¬ 
chi (e quindi della testa e del collo) dalla ta¬ 


stiera al monitor. Una soluzione poteva es¬ 
sere fare un "buco" nel tavolo dove allog¬ 
giare il monitor, ma non sempre sarebbe 
stata praticabile, un’altra soluzione poteva 
essere l’alzare la tastiera fino al livello del 
monitor, ma anche qui la scomodità di bat¬ 
titura sarebbe stata eccessiva: Ecco quindi 
l’ingegnoso sistema EZ-View: un’armatura 
in plastica stampata con due specchi pa¬ 
ralleli. Il primo è posizionato di fronte al vi¬ 
deo e riflette verso il basso, il secondo è ri¬ 
volto verso di noi e ci permette di vedere il 
video riflesso dal primo specchio. L’altezza 
del secondo specchio è circa al bordo della 
tastiera e l’inclinazione può essere regolata 
per la visione ottimale. Entrambi gli specchi 
sono trattati antiriflesso per migliorare il 
contrasto. Anche se macchinoso, il sistema 
si rivela molto comodo in tutte quelle appli¬ 
cazioni che necessitano di un utilizzo inten¬ 
sivo della tastiera, mentre risulta inutile (evi¬ 
dentemente) con il mouse. 

L’idea è venuta a un chirurgo oftalmico 
che, oltre ad avere pazienti con disturbi da 
affaticamento, ha potuto sperimentare la 
scomodità di un monitor non posizionato 
comodamente con il suo computer. La so¬ 
luzione per il vostro mal di schiena da video 


BONDWELL. 

SISTEMI 

PER PROGRAMMI 
AMBIZIOSI. 

Bondwell risponde a ogni esigenza con una gamma 
completa di prodotti ad alta tecnologia: 

I Portatili. BW 8T - BW 8TH - BW B300 - BW B200. 

I Personal. BW 28 - BW 38 - BW 39 - BW B630. 
Una scelta completa di PC e AT professionali. 

II Videotelefono. BW VT91. Il primo sistema di teleco¬ 
municazione di immagini collegabile al PC. 

IL PC-Fax. BFAX 100. Il primo collegabile direttamen¬ 
te al computer per un nuovo modo di gestire le comu¬ 
nicazioni. • 

Centri di distribuzione: 

BERGAMO: Delta. Tel. (035) 24.92.64 • BOLOGNA: 
Teletex. Tel. (051) 73.44.85 • CAGLIARI: Pac. Tel. 
(070) 66.90.96 • ENNA: Italsoft. Tel. (0935) 
69.25.60 • LIVORNO: Dee. Tel. (0586) 89.12.92 
• MILANO: Systeam. Tel. (02) 26.30.04.60 • 
PADOVA: Systeam. Tel. (049) 807 22.20 • ROMA: 
Discom. Tel. (06) 520.78.39 • ROMA: Elcom. Tel. 
(06) 701.26.02 • SALERNO: Nova, Tel. (089) 
23.36.55 • TORINO: G.S.T., Tel. (011) 220.26.51 

Bondwell offre 12 mesi di garanzia e un servizio qualificato 
con una rete di 52 centri di assistenza diffusi in tutta Italia. 

mm 

1 
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Bonduuell 




Per ricevere ultenori informazioni e la documentazione 
su prodotti e punti di vendita, telefonare o scrivere a: 
BONDWELL ITALIA s.r.l. - Servizio Marketing - Via 
Cantu. 19 - 20092 CINISELLO BALSAMO (Milano) - 
Tel. (02) 660.11 212 (r.a.) - Fax (02) 660.11.328. 


1 Desidero ricevere una documentazione sui vostri prodotti. 1 

□ PORTATILI 

□ PERSONAL 

□ VIDE0TELEF0N0 

□ PC-FAX 

Nome e Cognome 


1 Indirizzo N° 

Citta 

CAP 

Telefono 
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ATTUALITÀ 




trice, provvede a riscaldare i fogli per il fis¬ 
saggio del colore. Con questi due elementi 
alla Kroy è bastato confezionare una serie 
di maschere per Claris MacDraw e far pre¬ 
parare dei cartoncini fustellati per ottenere il 
“Sign Studio". I colori disponibili sono molti e 
possono essere lucidi, opachi o metallizzati. 
Per chi vuole poi avere tutto pronto per but¬ 
tarsi nell'attività delle targhe e della segna¬ 
letica esiste lo starter kit che comprende le 
pellicole colorate, un assortimento di car¬ 
toncini fustellati e addirittura le cornici in 
plastica per completare il lavoro. 

Questo sistema è un’interessante alternati¬ 
va al sistema a taglio della Letraset per la 
creazione di targhe di dimensione non su¬ 
periore al formato A4. 

CARTA DIGITALE 


Dopo il successo del mouse torna alla ribalta la trackball, sia integrata nella tastiera che come add 
on. Se non avete abbastanza spazio sulla scrivania per usare il vostro mouse, forse varrebbe la pe¬ 
na di considerare queste soluzioni. 


è quindi finalmente disponibile a circa 
quattrocentocinquantamila lire. 

INSEGNE E TARGHE 


Se qualcuno di voi possiede un sistema di 
DTP con laser printer, avrà cercato più di 
una volta di produrre targhe e cartelli per gli 
amici, ma l’inevitabile stampa in bianco e 
nero limita molto il risultato. C'è però 


un’azienda che ha inventato il sistema per 
dare colore alle stampe laser e addirittura 
ha realizzato un efficentissimo sistema per 
la produzione di targhe a livello professio¬ 
nale. Si tratta del “Sign Studio” della ingle¬ 
se Kroy. Il punto centrale del sistema è un 
particolare tipo di pellicola colorata che si 
fonde e fissa al toner termoplastico della 
stampante se sottoposto a calore. Un parti¬ 
colare dispositivo, simile ad una plastifica¬ 


li futuro della memorizzazione è al laser... 
Molte aziende stanno concentrando gli 
sforzi su dischi ottici di vari tipi, ROM. 
WORM ed erasable, ma sempre con i vincoli 
di un supporto rigido e delicato. 

Dal colosso della chimica ICI arriva ora una 
novità: la carta digitale. Si tratta di un sup¬ 
porto in poliestere su cui è stato depositato 
uno strato di polimero capace di memoriz¬ 
zare otticamente dati secondo lo stile 
WORM (Write Once Read Many). Rispetto a 
tutti gli altri supporti ottici fin’ora prodotti la 
“Digital Paper ICI" è un’innovazione impor¬ 
tantissima. La produzione avviene in rotoli 
e la flessibilità di questo supporto permette 
la realizzazione di bobine, dischi, cassette 
con nastro ottico di capacità impressionan¬ 
ti. Una bobina da dieci pollici e mezzo di 
nastro alto mezzo pollice (un formato stan¬ 
dard per i nastri magnetici) può contenere 
600.000 megabyte (seicentomila!!!), utiliz¬ 
zando le attuali tecnologie laser. Il costo ri¬ 
dotto di questo supporto ottico è un ulterio¬ 
re passo avanti nello sviluppo di memorie di 
massa permanenti e già alcune aziende co¬ 
me la Bernoulli e la Creo stanno lavorando 
su drive in grado di utilizzare la Digital Pa¬ 
per. I primi risultati sono relativi ad un drive 
realizzato dalla Creo che utilizza una bobi¬ 
na di carta digitale da 12,5 pollici di diame¬ 
tro e 1,4 pollici di altezza per immagazzina¬ 
re un milione di megabyte (per capirci, circa 
trecento milioni di pagine come quelle della 
nostra rivista). La Bernoulli Optical System 
Corporation sta invece lavorando ad un 
drive che utilizza della digitai paper tagliata 
nella più tradizionale forma a disco per rea¬ 
lizzare i floppy disk ottici. 

Se tutto procede potremo forse vedere la 
vendetta della cassetta sul Compact Disk. 


Con una laser printer ed il Sign Studio della Kroy è possibile produrre targhe ed insegne di piccole 
dimensioni in poco più di tre minuti e con un look estremamente professionale. Con questo metodo 
è possibile colorare qualsiasi stampa a toner termoplastico (laser printer, fotocopie ecc.). 
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Per gente come questa 

ci vuole un computer fatto da gente come questa. 


Cresce a decine di migliaia il numero dei nuovi ita¬ 
liani. I personal e i minicomputer Unibit. 

E cresce Unibit accanto alla gente che cresce. Perché 
è un aiuto concreto per chi opera con intelligenza. La 
gente crede in un'azienda i cui collaboratori sono tutti 
azionisti: lavorare bene diventa interesse di tutti. La 
gente ha fiducia in una famiglia di prodotti che risol¬ 
vono problemi, vecchi e nuovi, e stimolano la creati¬ 
vità personale. Anche con il supporto continuo dei 
rivenditori Unibit: una rete che vi è vicina in tutta 
Italia. 

Cognome e nome: Unibit PCbit. 

Alte prestazioni e costi contenuti: il grande successo 


dei PCbit significa che la gente ha bisogno di personal 
computer professionali, potenti, versatili e affidabili. 
In grado di lavorare con MS DOS®, MS OS/2®, 
Xenix® e Unix®, dal V20 - il punto d'ingresso - ai 
diversi 286 - anche trasportabili - ai 386 - non plus 
ultra nella potenza. 

Unibit TSX, la nuova generazione. 

Sempre più italiani scelgono i superpersonal- TSX: 
prestazioni da minicomputer, semplicità e costi di 
gestione da personal. Le serie TSX 200 e TSX 300, con 
le loro Work Station, sfruttano totalmente le caratte¬ 
ristiche dei sistemi operativi multiutente Xenix e 
Unix pur rimanendo pienamente compatibili con gli 


ambienti standard MS DOS e MS OS/2 e con la loro 
enorme biblioteca software. 

Un’intera famiglia vi aspetta. 

Se volete vedere dal vero i nuovi italiani, telefonate¬ 
ci. Gli indirizzi dei Rivenditori Autorizzati Unibit 
sono anche sulla rivista MCmicrocomputer. 

Unibit è il fenomeno italiano che sta migliorando il 
mondo dei computer. E' la grande alternativa che 
cresce insieme ai suoi clienti. Gente come voi. 



Personal e minicomputer Unibit. La famiglia dei nuovi italiani. 


Unibit S.ft.A. ' Direzione generale: Roma, via di Torre Rigata 6. tei 06.4090650 (r.a.).fax 06.4090727 Filiale di Milano: Segrate, Milano S. Felice Centro Commerciale, tei 02.7532003/7531071, fax 02.7532040 

































Grande è bello 


ATTUALITÀ 


I laboratori di ricerca e sviluppo delle case 
giapponesi devono essere tutti più o meno 
simili in quanto da questi fuoriescono le 
stesse idee. È il caso della Fuji e della Silver 
Reed che hanno presentato due particolari 
riproduttori dalle funzionalità molto simili. 
Si tratta di uno scanner abbinato ad una 
stampante termica; quello che viene passa¬ 
to allo scanner viene riprodotto dalla stam¬ 
pante termica. L’elemento che caratterizza 
entrambi i riproduttori è però il rapporto fra 
il formato di lettura e quello di stampa. 

II riproduttore Silver Reed, EL2300, può ri¬ 
produrre un A4 in formato A4 A2 Al e AO 


Quando il bug si nasconde bisogna passare alle maniere forti: la scheda di debug della A cer vi per¬ 
metterà di tessere un 'efficace tela a prova di crash e altri problemi di ordinaria amministrazione du¬ 
rante lo sviluppo del software. 


LE MIGLIORI UTILITÀ AMERICANE PER COMPUTERS 


IBM PC, XT, AT, PS/2, OLIVETTI, COMPAQ, AMSTRAD E TUTTI I COMPATIBILI* 

SOLO PROGRAMMI ORIGINALI CON GARANZIA 
UFFICIALE DEL PRODUTTORE 

I prezzi indicati comprendono IVA e spese postali franco. 


PCSG-LUCID 30 (offerta promozionale L. 300.000) L 390.000 
PC Magazine Award for Technical Excellence (USA) - 12/1907. 

Primo loglio elettronico tridimensionale resi 
dente in memoria: intercambiabilità dei dati in qual 
siasi applicazione, numerazione europea, tiles 
compatibili 123, calcolo velocissimo, prestazioni 
sofisticate e straordinarie possibilità strutturali 
Ogni cella può contener un intero foglio di calcolo, o pagine di testo, 
entrambi accessibili con un tasto. Menus. Funzioni, Macros totalmente 
assistiti. Finestre (9 fogli di calcolo sullo schermo). Notepad, Clipboarti, 
Calcolatrice. Editore Limitato solo dalla capacità del disco fisso. 

TAKECHARGE!. New! (offerta lancio L 185.000) L. 245.000 
Oa solo, fa tutto ciò che fanno assieme dieci tra le più note 
utilità. Residente in memoria (soltanto 20 K), l'unico funzio 
nante con programmi giganti, contiene tutte le utilità di cui si 
fa sempre uso! (software 600 K). 

PAUL MACE UTILITIES New Release (oltre i 32Mb) L. 196.000 
Insostituibile per il recupero dei files dopo formattazione accidenta 
le del disco fisso, «disastri» hardware o software, Virus, ecc 3 dischi 
con dBFix. 17 utilità senza paragoni Elette The Best of thè Year 
1987 (USA e Francia) 

PAUL MACE hTEST/hFORMAT... New Release 1988 L. 196.000 

Riconfigurazione (senza formattare) del fattore d'accesso al disco fis 
so. con miglioramento da 50 a 600%. ricupero settore boot. formatta 
zione a basso livello, partizioni, controllo, diagnosi hardware del disco 
(isso, ecc.. 

PAUL MACE G.R.A.S.P.... New Release 3.1. L. 280.000 

Presentazioni a livello professionistico (video e stampa), schermate e 
personaggi animati, demos, ecc. Cattura edizione (immagini e colori), 
archiviazione (testo o grafico) m formali BSAVE, PIC, PCX (PC Paint- 
brush, Ventura). GIF. Sopporta testo e grafica CGA, EGA, VGA, 
Hercules Incolor. ecc.. 

PAUL MACE ARTOOLS... New!.L. 196.000 

Tutto il necessario per dare a G.R.A.S.P.. senza difficoltà tecniche 
le più sofisticate routines d'animazione, e straordinari effetti speciali video 
' Tutti i nomi citati sono marchi registrati dai legittimi proprietari 



MULTIWARE Via Sanvito. 60 21100 Varese (Va) 

(0332) 287576 PER ORDINI TELEFONICI E INFORMAZIONI 
(Rivenditori: consultarci) 

Totale allegato L _ 

Assegno circolare Assegno personale Assegno Postale 
C/C Postale 14832216 Vaglia Postale 

Pagherò in contrassegno al postino Firma_ 

Ditta (o Nome)_Società (o Cognome)_ 

Indirizzo_ 

CAP_Città_Tel_ 

P IVA/Cod Fise L_l_ J_1_LJ_1. L J _1—1 J_! 

Desidero ricevere il disco listino con il software fuori listino (nume 
rosi titoli) e le novità Allego L 3 500 in francobolli per contributo spese 


PAUL MACE Nvelope... New! (per Mac L. 145.000) L. 115000 

Per catturare, editare, archiviare e stampare indirizzi (stampa vertica 
le. vari caratten di stampa, etichette e buste tutti i formati, mailing. ecc ). 
Compatibile con tutti gli elaboratori e stampanti, incluse HP o TI laser 

PAUL MACE VACCINE... New!. L. 60.000 

Protezione del disco fisso e del sistema operativo ad alto livello, con 
tro tutti i VIRUS del computer e tutte le alterazioni indesiderabili 

□ REINSTAL... New!. L. 160.000 

Garantisce tutti i programmi protetti installati su disco fisso (pur¬ 
ché con disinstallazione), contro ogni irrimediabile rischio di perdi 
ta (optimizers e/o backup non selettivi, formattazione, «disastri» hard 
ware o software, ecc ). Funziona con tutti i sistemi di protezione 
e computers. 

PC-8/MULTITASKING. L. 290 000 

Esegue SIMULTANEAMENTE sotto DOS, fino a 9 programmi, con 
qualsiasi emputer compatibile, senza linguaggio o sintassi speciale 
Versione multi utente con 7 programmi + 2 terminali ANSI (o PC in 
emulazione), e possibilità di gestione a lunga distanza tramite MODEM 


PC-8/MULTIUSER... New! . L. 1.175.000 

NEWSPACE... New Release . L. 220.000 

Aumenta la capacità in Mbytes di qualsiasi disco fisso (fino a 90%) 
QUAID ANTIDOTE... New! . L. 155.000 

Ora indispensabile localizza subito ed AUTOMATICAMENTE i files 
danneggiati da qualsiasi tipo di VIRUS che possa gradualmente con 
tammare il computer 

QUAIO - COPYWRITE New release 88.L. 130.000 


QUAID - ANALYZER New professional release L. 345.000 
QUAIO • DISK EXPLORER New release 88 L. 140 000 
QUAIO - The-Envelope-Please - New release L. 100.000 
PIZAZZ - Desktop Publishing Image Editor L. 200.000 

Per catturare qualsiasi schermata, trasformare colori in 30 toni di gn 
gio. ingrandire, rimpicciolire, fmestrare. ruotare, e crear-' r d'im 
magmi, files compatibili eco VENTURA, PAGEMAKER (.TIF) e PC 
PAINTBRUSH ( PCX). 

BACK-IT - Hard Disk Backup... New Release 88 L. 235.000 
Q-DOS-II Hard Disk Manager.. New Release 88 L. 155.000 
GS OPTIMIZER Hard Disk Optimizer... NEW! L. 235.000 
WINDOWDOS • DOS Shell... New Release 88 L. 100.000 
EZ-MICROCACHE con SpeedWrite e SpeedSprint L. 190.000 
PRN-Matic - per cambiare i parametri di stampa L. 60 000 
JACK2 - Integrato (testo-calcolo-data base-grafica) L. 200.000 
TORNADO - Random Information Processor L. 200.000 


WARP-TEN (velocizzatore) . L. 55.000 

RAMBAK (salvataggio disco RAM). L. 55.000 


POLYBOOST - Velocizz. (dischi, video, tastiera) L. 138.000 


che corrisponde a 21 x 29 cm, 42 x 58 cm, 58 
x 84 e 84 x 116 cm. Il Poster Printer Fuji ri¬ 
produce invece solo da A4 o B4 a A2 o Al. 
Nella configurazione base entrambi i mo¬ 
delli permettono di produrre da un qualsia¬ 
si originale un "poster" su carta termica in 
circa due minuti (per il formato più grande). 
Silver Reed ha previsto anche un’interfac¬ 
cia opzionale per il collegamento ad un 
computer per stampare in uno dei formati 
previsti. La risoluzione in A4 è di 200 punti 
per pollice e diminuisce proporzionalmente 
all'aumento di formato. Con uno di questi 
riproduttori, collegato ad un PC è possibile 
realizzare manifesti di varie dimensioni in 
tempi rapidi anche se la carta termica non 
ha molta resistenza alla luce e all’umidità. 

Acer - Debug Card 

Se il linguaggio macchina è il vostro pane e 
amate sviluppare programmi per macchine 
MS-DOS, allora la Debug Card prodotta 
dalla Acer potrebbe ridurre notevolmente le 
ore notturne di lavoro semplificando la cac¬ 
cia al bug. La ricerca con i soli tool software 
spesso si risolve in un bel blocco del siste¬ 
ma mentre con l'inserimento di questa 
scheda nel PC (che a questo punto deve ri¬ 
manere aperto) è possibile seguire il pro¬ 
gramma in esecuzione e tutti i parametri di 
sistema fino al fatidico crash. Lo stato della 
macchina è raffigurato da una serie di indi¬ 
catori e numerosi interruttori permettono il 
controllo del single stepping, dei break 
ooint ecc. La crudezza delle indicazioni e la 
necessità di tenere il computer aperto ripor¬ 
tano finalmente lo sviluppo del software su 
PC all’ambiente da “antro delle streghe”, 
da un lato pittoresco e dall’altro carico d'i¬ 
spirazione. 

Questa scheda è dedicata solo ai più acca¬ 
niti. fl 
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STAMPANTE 
MANNESMANN MT 91 


di PAOLO CIARDELLI 



Il settore delle stampanti, con il passare 
degli anni e con il continuo progresso tec¬ 
nologico, sta assumendo sempre maggio¬ 
re importanza nel campo dei Personal 
Computer 


razie ai vari tipi di stampanti 
esistenti sul mercato, l’utente 
è adesso in grado di soddi¬ 
sfare anche le richieste più 
esigenti. Un notevole svilup¬ 
po l’hanno avuto le cosiddette stampanti a 
getto d’inchiostro, che saranno l’argomen¬ 
to della nostra prova con la recentissima 
Mannesmann Tally MT 91. Questa stam¬ 
pante può essere considerata come un ve¬ 
ro e proprio gioiello ed offre delle innova¬ 
zioni veramente interessanti scaturite dagli 
accurati studi che sono stati fatti dagli 
esperti nei laboratori della nota casa tede¬ 
sca. 

Le caratteristiche della Mannesmann Tally 
Mt 91 sono molteplici. 

Iniziamo innanzitutto dalla sua proverbiale 
silenziosità, paragonabile ad una stampan¬ 
te laser, fino alla straordinaria manegevo- 
lezza ed al costo notevolmente contenuto 
(minore di una comune stampante laser) 
nonostante le grandi capacità che la MT 91 
è in grado di offrire. 

Per quanto riguarda la silenziosità, possia¬ 
mo dire che la MT 91 si pone al vertice della 
sua categoria e lo dimostrano i dati di pro¬ 
va di laboratorio. 

La stampante ha fatto registrare un livello 
di rumorosità pari ai 48 dBa contro i 55 dBa 
delle normali stampanti a getto d’inchio¬ 
stro, senza compromettere le sue prestazio¬ 
ni davvero ragguardevoli. 


Straordinario vero? 

Per quel che riguarda la stampa, la Manne¬ 
smann Tally MT 91 è in grado di stampare 
220 caratteri al secondo in alta velocità e 
110 caratteri al secondo in alta densità. 

Il mareriale su cui stampare è della carta 
normalissima, come quella delle fotocopia¬ 
trici tanto per intenderci, magari se si sce¬ 
glie una carta leggermente porosa gli effetti 
sono migliori. 

Per la gestione della carta usa un vero e 
proprio caricatore automatico di fogli sin¬ 
goli, che attraverso una precisa gestione 
dei moduli consente una grande praticità 
d’impiego. 

Ci ripetiamo dicendo che offre una risolu¬ 
zione di stampa notevole con una testina a 
48 ugelli. 

Questi, la vera innovazione, sono dotati di 
una specie di chiusura automatica che ne 
blocca il getto d’inchiostro rendendo così la 
stampa molto più precisa e pulita. 

La MT 91 è nata soprattutto per la gestione 
di normali testi di lavoro in quanto effettua 
delle copie che sono paragonabili addirit¬ 
tura ad una stampante laser, e le sue capa¬ 
cità possono essere integrate con l'ausilio 
di fonti opzionali che sono disponibili, pres¬ 


so i rivenditori Mannesmann, in cartuccia. 
Puntualiziamo che a differenza di una prin¬ 
ter laser, una a getto di inchiostro produce 
degli originali e non delle “fotocopie”. 

Non delude nel modo più assoluto anche 
nella gestione della stampa di testi grafici 
molto complessi ed è in grado di ottenere 
una risoluzione grafica fino a 360 punti per 
pollice, soddisfacendo quindi ogni tipo di 
clientela. 

L’interfacciamento ed il colloquio, che sono 
degli elementi essenziali sono assicurati da 
due sistemi ben precisi. 

Il primo è assicurato da un’interfaccia di ti¬ 
po parallelo standard oppure seriale con 
l'aggiunta di una scheda opzionale, mentre 
il secondo è assicurato dalla ormai consue¬ 
ta compatibilità IBM Proprinter residente, 
con la possibilità di altre emulazioni, fra cui 
la NEC ed il DIABLO. Concludendo, possia¬ 
mo dire che la Mannesmann Tally MT 91 è 
una stampante a getto d’inchiostro che è in 
grado di soddisfare ogni esigenza con la 
massima precisione e funzionalità ed è 
commercializzata sul mercato ad un prezzo 
altamente competitivo. Quindi prima di ef¬ 
fettuare una scelta rivolta a questo settore 
di printer, pensateci bene. ■ 
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Simboli e Cotoni 



di GIANNI AGAMENNONE 


Per gli utenti Amiga c'è una nuova stam¬ 
pante a colori: la Citizen HQP-40 


a CITIZEN HQP-40 è una stam¬ 
pante a costo contenuto ma 
con notevoli caratteristiche fi¬ 
no ad oggi riservate a stam¬ 
panti di costo molto elevato. 
La stampante in oggetto possiede due in¬ 
terfacce: una parallela con standard Cen¬ 
tronics e l'altra di tipo seriale RS232 C. 


Ciò costituisce un notevole vantaggio per 
l’utente che ha impegnata una delle due 
porte per scopi personali. 

Nel dischetto fornito con la stampante sono 
presenti, nella directory DEVS/PRINTERS, i 
printer driver necessari per un corretto uso 
deH'hard-copy del video. 

Se alla CITIZEN HQP-40 viene aggiunto un 
kit opzionale, sarà possibile stampare a co¬ 
lori le immagini video su qualunque tipo di 
carta. 

Uno speciale sistema meccanico muove in 
senso verticale, verso il basso o verso l’alto, 
il caricatore del nastro contenente 7 tonali¬ 
tà diverse in modo che gli aghi della testina 
possano imprimere sulla carta il colore cor¬ 
rispondente aH’immagine. 


La testina di stampa Citizen ha 24 aghi ed è 
protetta termicamente garantendo un sicu¬ 
ro funzionamento nel tempo; un buffer in¬ 
terno di 24k per i dati in ingresso consente 
di liberare in breve tempo la memoria del 
computer per svolgere un altro lavoro men¬ 
tre la stampa è in corso, ciò costituisce un 
notevole vantaggio per le possibilità multi¬ 
tasking del computer Amiga. 

La CITIZEN HQP-40 dispone di un sostegno 
orientabile con guide verticali che permet¬ 
tono l'inserimento dei fogli singoli, ad esem¬ 
pio in formato A4; inoltre provvede alla col- 
locazione automatica del foglio stesso in 
posizione perfetta di inizio stampa, sono 
cosi evitati quei noiosi controlli manuali di 
allineamento carta. 
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Notevole è la possibilità di accedere al 
controllo completo della stampante senza 
dover aprire ogni volta il carter dopo com¬ 
plesse operazioni meccaniche; infatti sul 
frontale sono disponibili, oltre ai soliti LINE 
FEED/FORM FEED ed ON LINE, un pulsan¬ 
te che seleziona quattro modi di stampa 
(DRAFT, CORRESPONDENCE, LETTER 
QUALITY e SPAZIATURA PROPORZIONA¬ 
LE) ed un secondo pulsante che seleziona 
i font esterni residenti in schede inseribili 
facilmente nella stampante, risulta cos 
possibile emulare altri standard come, ad 
esempio, quello EPSON ed IBM. 

Inoltre è possibile accedere facilmente ai 
numerosi dip-switch posti dietro uno spor¬ 
tellino sotto i pulsanti summenzionati. 

I quattro gruppi di switch sono settabili in 
numerose combinazioni di utilizzo o di esi¬ 
genza e viene indicata a sinistra di ogni 
configurazione quella di default o settag¬ 
gio fatto dalla fabbrica; in tal modo l’uten¬ 
te ha una guida sicura a riportare gli 
switch eventualmente manomessi nella 
posizione originaria a tutti può capitare di 
manomettere alcuni switch èsenza aver 
compreso prima il significato di ciò che si 
va a manomettere! 

Comunque i manuali forniti dalla Citizen 
sono un’òttima guida a risolvere problemi 
e esigenze di stampa che l’utente può spe¬ 
rimentare. 

Dopo questa doverosa e breve presenta¬ 
zione della stampante CITIZEN HQP-40 
passiamo a descrivere le operazioni effet¬ 
tuate sul computer Amiga per ottenere I - 
hard-copy. 

I comandi digitati sulla tastiera sono: show 
a6, dove il primo è il comando di visualiz¬ 
zazione ed il secondo (a6) è il nome del¬ 
l’immagine. Dopo questa stringa non do¬ 
vete premere subito RETURN, ma con il 
mouse cliccare due volte l'icona “”GRAP- 
HICSDUMP”, ritornare rapidamente in CLI 
ed infine premere il tasto RETURN. 

A questo punto sarà visualizzata l’immagi¬ 
ne e dopo un po’ inizia l’hardcopy dello 
schermo sulla carta della stampante. 

Ciò costituisce soltanto una delle numero¬ 
se soluzioni di stampa adottabili, gli utenti 
che hanno più fantasia dello scrivente po¬ 
tranno suggerire metodi più eleganti e mi¬ 
gliori comunicandoli presso la nostra rivi¬ 
sta che ne curerà la pubblicazione. 

La stampante CITIZEN FIQP-40 è distribuito 
dalla TELAV ed il modello con cui sono sta¬ 
te effettuate le prove è stato messo a dispo¬ 
sizione dalla EASYDATA Via Omodeo 21 
ROMA tel.7858020 ■ 



)*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVV 
*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVW> 
F, - ./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXÌ 
,-./0123456789: ;<=>? @ABCDEFGHIJKLMNOPQRSTUVWXYZ 
-./0123456789:;<=>?0ABCDEFGHIJKLMNOPQRSTUVWXYZI 
./0123456789: ;<=>? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ [\ 
/0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\] 
3123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]' 
123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]~ 
23456789: ;< = >? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ[ \ K _ ~ 
3456789: ;< = >? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ[ \ ] * c 
4 56 78 9 : ? <*>?<? ABCDEFGHI JKLMNOPQRSTUVWXYZ [\] al 

5678 9 : ;<=> 70ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]~_'abc 
6789: ;< = >? @ABCDEFGHIJKLMNOPQRSTUVWXYZ [ \ ] ' abcc 

7 8 9 : ; < = > ? 0ABCDEFGHI JKLMNOPQRSTUVWXYZ [ \ 1 abcd* 

89:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]abcde i 
9:;< = > ? ©ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]abcdefc 
: ; < = > ?0ABCDEFGHIJKLMNOPQRSTUVWXYZ[ \ ]abcdefgf 
; = > ? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ [ \ J abcdefghi 

<=>70ABCDEFGHIJKLMNOPQRSTUVWXYZ [\] abcdefghi ' 

= > ? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ[ \ ] ~_ 'abcde f ghij } 
>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]abcdefghijk J 
? 0ABCDEFGHIJKLMNOPQRSTUVWXYZ[ \] abcdefgh i jkIr 
0ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]~_'abcde f ghij k1mr 
ABCDEFGHI JKLMNOPQRSTUVWXYZ[\] ~_' abcdefghijklmnc 
BCDEFGHIJKLMNOPQRSTUVWXYZ[A]abcdefghijklmnoi 
CDEFGHIJKLMNOPQRSTUVWXYZ[\]abcdefghijklmnopc 
DEFGHI JKLMNOPQRSTUVWXYZ[\]“ 'abcdefghijklmnopqi 


Prova di self-test della stampante Citizen-HQP 40 
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Lotus Magellan 



di PAOLO CIARDELLI 


Vi presentiamo il nuovo programma Lo¬ 
tus, denominato Magellan, una utility di 
grandissimo interesse. 


Itre al comunicato standard 
abbiamo pensato che fos¬ 
se il caso di fornire alcune 
informazioni supplementari 
espressamente riservate agli 
operatori del settore. Queste informazioni 


comprendono questo testo ed alcune "vi- 
deate" di una versione beta di Magellan. 
Magellan è un programma appartenente 
alla categoria utility, nella quale ritroviamo 
programmi come Norton Utility, Norton Com- 
mander, PC Tools, eccetera, ma possiede 
alcune caratteristiche innovative che lo 
identificano in maniera unica ed assoluta. 
Il motto del programma è "Find it! View it! 
Use it!” ed è esattamente in queste opera¬ 
zioni che Magellan si distingue nettamente 
dai concorrenti: 

RICERCA 

Con Magellan è possibile ricercare un file 
oppure una stringa di testo semplicemente 
digitandola. Mano a mano che la stringa 
viene composta, Magellan ricercherà ed 
evidenzierà i caratteri digitati anche se que¬ 
sti appaiono alTinterno di un’altra stringa. 
La ricerca può riguardare anche il conte¬ 


nuto di un file di qualunque tipo, oppure 
può interessare gruppi interi di file; ad 
esempio è possibile ricercare tutti i file con¬ 
tenenti una determinata sequenza di carat¬ 
teri. Un’altra caratteristica interessante è 
quella che consente di operare su tutti i file 
del disco contemporaneamente oppure 
soltanto su alcuni, ad esempio quelli che 
soddisfano una specifica di ricerca oppure 
tutti quelli generati da un programma appli¬ 
cativo (1-2-3, Agenda, ecc.). Con Magellan 
è possibile “ignorare" la struttura delle di¬ 
rectory, se lo desidera. 

VISUALIZZAZIONE 

Una caratteristica assolutamente unica è la 
capacità di visualizzare un file dati con lo 
stesso aspetto che avrebbe all’interno del 
programma da cui è stato generato; in pra¬ 
tica viene simulato l’ambiente originario del 
file, agevolando notevolmente l’esame dei 
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dati in esso contenuti. La simulazione o vi¬ 
sta è ottenuta per mezzo di alcuni driver 
particolari, detti Viewer, attualmente l’elen¬ 
co delle applicazioni gestite è il seguente: 

VIEWER PROGRAMMA 

123.VWR Lotus 1-2-3 versioni 1->2.x 
123R3.VWR Lotus 1-2-3 versione 3.0 
AGENDA.VWR Lotus Agenda 
ARC.VWR Are, Pkarc (programmi di com¬ 
pressione file) 

BINARY.VWR Formato binario 
DBASE.VWR Ashton Tate dBase II -> IV 
DW4.VWR IBM Display Writer IV (videoscrit¬ 
tura) 

MNSCRIPT.VWR Lotus Manuscript 
MULTMATE.VWR Multimate 3.3 
SYMPHONY.VWR Lotus Symphony versioni 
1->2.x 

TEXT.VWR Formato ASCII 
WORD.VWR Microsoft Word 
WORDSTAR.VWR Micropro Wordstar e 
Wordstar 

Professional versione 2.2->5.0 
WPERFECT.VWR WordPerfect 5.0 
WS2000.VWR Micropro Wordstar 2000 
1,0->3.0 

XYWRITE.VWR XYWrite 

UTILIZZO 

Altre funzioni interessanti consentono di 
"prelevare” parte delle informazioni conte¬ 
nute in alcuni file e di “costruire" con esse 
un altro file di consolidamento senza la ne¬ 
cessità di intervenire all'Interno di diversi 
programmi applicativi per eseguire conver¬ 
sioni di formato e senza intaccare minima¬ 
mente l’integrità dei file originali. Ad esem¬ 
pio, l’elenco dei Viewer contenuto in questo 
testo è stato prelevato direttamente dalla 
directory del disco utilizzando Magellan. 

GESTIONE DEI FILE 


r n 


Lotus Magellan 14 



Use 

to Navigate 

TREE 

Tree: C:\MS\NL3 




- 


NL.SET 

Al: 

[W10] 

'Numero di combinazioni possibili in base al 

READY 

NL3.BAK 






NL3.DOC 


A 


B 


NL TMP.BAK 

1 

Numero di 

combinazioni possibili in base alla lunghe 

NL TMP.DOC 

2 

della password e al numero di caratteri utilizzabili 

PASSW.WK1 

3 





TESTOl.CGM 

4 

Lunghezza 

Solo caratteri 


TESTOl.DRW 

5 

password 

alfabetici 


TEST02.CGM 

6 





TEST02.DRW 

7 



26 


TEST03.CGM 

8 





TEST03.DRW 

9 


3 

17.576 


TEST04.CGM 

10 


5 

11.881.376 


TEST04.DRW 

11 


8 

2, 088270645760000E+11 


TEST05.CGM 

12 


10 

1,411670956533760E+14 


TEST05.DRW 

13 


20 

1,992814889520941E+28 



14 


40 

3,971311183896360E+56 



15 






16 

Nota: 


La notazione n,nnn E+ yy significa n,nnn 

X 


12/04/89 

17:06 


File 6 of 16 

C 

: \MS\NL3\PASSW. WK1 Lotus 1-2-3 



—FI 1 F2 1-F3-. F 4-1-F5-1 F6 1-F7-. F8 1-F9-pFlO- 

Help | Copy | Delete | Print | Gather | Sort | Launch | Zoom | Explore | Quit 


Un esempio di “view” in formato Lotus 1-2-3 


_ Lotus Magellan 14 
Tree: All Drives 
<A:\> 

<B:\> 

<C:\> 


Use 

—<123> 
<AGENDA> 
<DOS> 

<FL> 

<MAGELLAN> 


—<MAIL_NL> 

—<MS> 

—<MS1> 

—<SYM2> 

—<WL> 

— AUTOEXEC.BAT 

— COMMAND.COM 

— CONFIG.SYS 


to Navigate 


<DIR> 

2/01/80 

3:27 

<DIR> 

25/10/88 

15:51 

<DIR> 

2/01/80 

3:26 

<DIR> 

27/06/88 

16:49 

<DIR> 

12/04/89 

11:27 

<DIR> 

9/11/88 

12:23 

<DIR> 

8/08/88 

15:12 

<DIR> 

2/01/80 

3:27 

<DIR> 

10/02/88 

17:23 

<DIR> 

20/09/88 

18:58 

69 

16/04/87 

14:32 

23.855 

29/01/87 

12:00 

84 

16/04/87 

14:33 


\ 

TREE 


Dir 3 
-FI 


of 3 


C: \* . * 


"1 

r— F2 ; 

1- F3 -1 

|-F4-! 

1- F5 -1 

-F6 

1- F? -1 

F8 | 

F9-pi 

•P 

Copy | 

Delete 

Print 

| Gather | 

Sort 

| Launch | 

Zoom | 

Explore | { 


24.008 Bytes 

FIO- 

Quit 


La modalità TREE che visualizza la struttura delle directory 


Oltre alle solite funzioni riguardanti lo spo¬ 
stamento, la duplicazione, il cambiamento 
nomi, la cancellazione di file e directory; 
Magellan offre alcune caratteristiche finora 
non riscontrabili in altri programmi. Ad 
esempio: 

- la capacità di cancellare una directory e 
tutto il suo contenuto con una sola opera¬ 
zione; 

- Magellan è in grado di copiare una direc¬ 
tory con tutto il suo contenuto, sottodirec¬ 
tory incluse, anche su altri dischi, nel caso 
dei floppy è in grado di gestire anche più di¬ 
schetti; 


- inoltre consente di spostarsi agevolmente 
da un punto all’altro del disco utilizzando, 
se lo si desidera, una vista ad albero che 
mostra la struttura della directory; 
e tutto questo, e molto altro ancora, in un 
solo programma! 

LAUNCH 

Con questa funzione l’utente è in grado di 
lanciare l’esecuzione del programma che 
ha prodotto un determinato file dati, vale a 


dire, se l’utente si è posizionato su un file 
generato da Lotus Symphony, premendo 
un tasto funzione Magellan riconoscerà il 
formato del file, ricercherà sul disco rigido il 
programma che lo ha generato e ne lance- 
rà l’esecuzione provvedendo a caricare au¬ 
tomaticamente il file dati. 

Magellan, in fase di installazione, ricerca e 
memorizza tutti i programmi che è in grado 
di riconoscere; è comunque possibile ag¬ 
giungere altri programmi eventualmente 
non contemplati da Magellan. ■ 
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G.A.P. 

Primo Generatore Italiano di Programmi 
in linguaggio dBase III e compilatore clipper. 


G.a.p. è un pacchetto che permette di rea¬ 
lizzare in pochi minuti una intera pro¬ 
cedura di gestione di uno o più ar¬ 
chivi dBase III a partire dal 
l’inserimento, variazio 
ne, cancellazione e 
visualizzazione per 
passare alle ricerche e 
stampe e per finire alla 
gestione sistema com¬ 
prendente salvataggi, ri¬ 
pristini, ristrutturazioni ecc. 

Il Generatore di Programmi 
in dBase III può essere utiliz¬ 
zato sia dalla grossa azienda, 
per ridurre i costi di realizzazio¬ 
ne del soft-ware, che dal singolo 
amatore che intenda imparare a 
programmare. Nel primo caso i 



vantaggi sono molteplici: tempi di 
realizzazione deN’80-90% di una 
procedura praticamente nulli, uni¬ 
formità nella struttura delle videa- 
te, delle varie procedure, unifor¬ 
mità nella struttura dei pro¬ 
grammi; da questi vantaggi 
poi, ne scaturiscono altri co¬ 
me ad esempio una facile in¬ 
tercambiabilità dei pro¬ 
grammi da un progetto ad 
un altro. Nel secondo ca¬ 
so invece il fatto impor¬ 
tante è che GAP offre una 
soluzione al problema, spesso 
difficilmente risolvibile, di realizzare 
una procedura avente una struttura otti¬ 
mizzata sia in generale che all’Interno dei 
singoli programmi. 


CARATTERISTICHE TECNICHE 

1 - GENERAZIONE MENU 

Genera il programma principale, più quello di in¬ 
stallazione e quello di apertura degli archivi. 

2 - GENERAZIONE SOTTOMENU 

Genera i sottomenu successivi ai menu della pro¬ 
cedura da cui partiranno i programmi. 

3 - GENERAZIONE DATA ENTRY 

Genera i seguenti programmi: 

Inserimento - Variazione - Cancellazione - Visualiz¬ 
zazione 

4 - GENERAZIONE DATA ENTRY (EDIT) 

Genera un data entry, come il precedente, che uti¬ 
lizza il comando DBEDIT del CLIPPER. 


5 - GENERAZIONE GESTIONE SISTEMA 

Genera i programmi addetti alle seguente funzioni: 
Salvataggio - Ripristino - Ricostruzione indici -Ri¬ 
strutturazione - Azzeramento -Format dischetti - 
Accesso al DOS. 

6 - GESTIONE RICERCHE 

Genera programmi per la ricerca e la visualizzazio¬ 
ne dei campi del file. 

7 - GESTIONE STAMPE 

Genera programmi per la stampa del file. Contiene 
l’opzione per la selezione dei campi da stampare. 

HARDWARE RICHIESTO 

512 Kbyte, 2 Floppy o 1 Floppy + Hard Disk 



SCHEDA DI PRENOTAZIONE 


Desidero ricevere N° . copie del programma GAP in offerta speciale inviandovi la 

somma di L. 280.000 cadauna anziché 560.000 comprese le spese postali. 

□ Invio assegno bancario non trasferibile, di L. 

intestato a EDICOMP Srl 

□ Versamento sul conto corrente postale n. 72609001 intestato 
a LIST - Programmi per il tuo home computer - Via Flavio 
Stilicone 111 - 00175 Roma, di cui allego fotocopia. 

□ Vaglia postale intestato a EDICOMP Srl - Via Flavio Stilicone 111 
00175 Roma. 

Se è richiesta fattura indicare Partita IVA... } . 

Compilare e spedire in busta chiusa a: EDICOMP Sii. - Via Flavio Stilicone 111 - 00175 Roma 


NOME . 

COGNOME 


VIA ... 

CAP.CITTÀ. 

PROV. Tel. 


Clip 

















di GIAN PIERO ROSI 

Niente paura: nessuno vuole sostituire il 
vostro medico con un computer. Ma d’ora 
in poi ogni dottore potrà avvalersi di un 
Amiga come valido aiutante che gli per¬ 
metterà di svolgere meglio il suo lavoro 



miga Medico è l’ultimo grido 
| in fatto di applicazioni soft- 

ware destinate ad un uso 
professionale. Questo pac- 
« ™ chetto creato dalla GIOCO- 

LOGICO di Treviso è in grado di sostituire il 
classico archivio cartaceo, finora utilizzato 
dai medici per conservare le cartelle clini¬ 
che dei pazienti (in gergo dette nosologiche 
ndr), con un rapido e flessibile data-base 
elettronico. Amiga Medico non permette so¬ 
lo di inserire, ricercare e stampare le cartel¬ 
le cliniche, ma di emettere stampe di ricette 
e certificati, anche sui moduli delle diverse 
Unità Sanitarie Locale. 


UNA STRAORDINARIA 
INTERFACCIA UTENTE 

Il punto di forza di questa realizzazione sof¬ 
tware è senza dubbio la ben riuscita in¬ 
terfaccia utente che, grazie alle eccezionali 
capacità grafiche del computer Amiga, 
sfrutta per il colloquio con l’operatore un 
gran numero di icone. Questi simboli grafici 
intuitivi rendono l’utilizzo del programma di 
una semplicità disarmante e forniscono a 
colpo d’occhio una rapida descrizione del¬ 
le patologie, delle diagnosi e delle terapie 
che hanno interessato il paziente durante 
tutto il corso del trattamento assistenziale. 
Il medico non dovrà perder tempo a digitare 
nomi e chiavi di ricerca, e potrà quindi dedi¬ 
care tutta la sua attenzione al paziente. 
Ogni operazione, infatti, può essere effet¬ 
tuata semplicemente muovendo il mouse 
sulla scrivania e “clickando” sull’icona de¬ 
siderata. Per selezionare una cartella, ad 
esempio, è sufficiente far scorrere con il 
mouse l’elenco dei pazienti. 


QUANDO IL COMPUTER 
VI CHIEDE DI DIRE “3]".., 



Amgajiedico 
Paziente fl 


Data di Nascita 


H Inizio rapporto 
Lun 85.Die.1988 


® Fine rapporto: 

nmi no ARO 


«=»»oh 80.???.8881 
I St.Civ: 

Data scadenza: 

Don 80.???.0801 


Professione 


Motivo: 


VERSIONE DIMOSTRATIVI! O 




Commodore 
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Con la stessa tecnica è possibile scorrere 
idealmente l’intera “vita” del paziente, vi¬ 
sualizzata sul monitor sotto forma di dise¬ 
gni simbolici che permettono di ricordare 
immediatamente ogni evento accaduto du¬ 
rante il corso della terapia. 

UN ARCHIVIO POTENTE 
E FLESSIBILE 

L’archivio di AMIGA MEDICO non conserva 
semplicemente le informazioni, ma è in gra¬ 
do di fornire quella giusta al momento giu¬ 
sto. 

Ogni dato relativo alla salute del paziente 
viene memorizzato e classificato, in modo 
da poter essere ricercato per tipo, per pato¬ 
logia o per data. 

È inoltre possibile evidenziare alcuni ele¬ 
menti apponendo sul “foglio” che contiene 
la descrizione dell’evento in questione, dei 
simboli, degli abstract, in grado di mostrare 
visivamente i contenuti salienti del docu¬ 
mento. 

L’archivio di AMIGA MEDICO può essere 
ispezionato velocemente grazie alla possi¬ 
bilità di “filtrare" le informazioni sul pazien¬ 


te per problemi, patologie o tipo. 

Ogni filtro può essere attivato con un click 
del mouse sulla voce desiderata, e può es¬ 
sere composto con altri filtri. 

Tutto questo vale anche per ciò che riguar¬ 
da le stampe. 

AMIGA MEDICO permette di memorizzare 
delle frasi di frequente impiego e di difficile 
digitazione, per richiamarle quando occor¬ 
rono semplicemente con un click sul mou¬ 
se, ed inserendole così nel testo che si sta 
elaborando. 


INFORMAZIONI TECNICHE 

Il pacchetto software AMIGA MEDICO è sta¬ 
to scritto in linguaggio “C” e realizzato gra¬ 
zie ad una stretta e proficua collaborazione 
con dei Medici di base. 

La configurazione minima necessaria per 
far girare il programma è un computer 
Commodore Amiga con almeno 512 Kbyte 
di memoria RAM, con due disk drive da tre 
pollici e mezzo oppure con un hard disk. 
Nel pacchetto sono compresi, oltre alla ver¬ 
sione operativa del programma, altri tre 
moduli: quello per l’elaborazione di statisti¬ 
che sulla popolazione degli assistiti, quello 


per la manutenzione e il file per gli SCRIPT 
(le facilitazioni per la scrittura di documen- 
ti). 

Per prendere visione del programma e valu¬ 
tarne quindi le prestazioni con i propri oc¬ 
chi, è stata realizzata una versione dimo¬ 
strativa distribuita gratuitamente dalla GIO- 
COLOGICO. 

Praticamente questa versione è identica al 
programma vero e proprio, tranne per l'im¬ 
possibilità di salvare su disco le nuove in¬ 
formazioni inserite. 


CONCLUSIONI 

La caratteristica di questo pacchetto che 
più ci ha colpito, lo abbiamo già detto, è 
l'interfaccia utente che fa un uso minimo 
della tastiera alfanumerica a favore del 
mouse, consentendo al Medico di non di¬ 
strarre la sua attenzione dal Paziente. 
Nondimeno ci ha stupefatto l’azzeccata 
simbologia grafica di immediata compren¬ 
sione, basata sul colpo d’occhio. Tutto 
questo anche per merito delle straordinarie 
qualità grafiche di Amiga. 

Inoltre la possibilità di modificare dinamica- 
mente l’archivio, inserendo, cancellando o 
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L'informatica sta sempre più modificando la 
professione del medico permettendogli di ri¬ 
sponde alle nuove esigenze della società. 


completando gli eventi già memorizzati, fa 
di questo programma uno strumento flessi¬ 
one, utile ed efficace. 

Non ci sembra azzardato affermare che tra 
non molto tutti i medici di base saranno co¬ 
stretti ad adeguarsi a questo tipo di innova¬ 
zione tecnica per poter garantire ai loro pa¬ 
zienti un’assistenza al passo con i tempi e 
adeguata all’evolversi della situazione so¬ 
ciale. 

Infine, un’ultima ma importante considera¬ 
zione. AMIGA MEDICO è in grado di fornire 
delle informazioni immediate ed accurate, 
ma che devono essere totalmente preinseri¬ 
te dal Medico. 

Vogliamo dire che questo programma non 
possiede la velleità di elaborare autonoma¬ 
mente diagnosi. In tempi come questi in cui 
si lascia sin troppo spazio al computer, c’è 
ancora qualcuno che pensa che almeno la 
nostra salute non debba essere affidata ad 
una manciata di chip e di fili elettrici. ■ 
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COMPUTER GRAFICA 


di OSVALDO CONTENTI 


Circa 474 anni fa Leonardo da Vinci era 
alle prese con gli “studi sulle acque ” del 
Codice Arundel. Dopo quasi metà millen- 


Turbolenze 
Ellittiche 


nio un piccolo computer tenta di emulare il 
“master-control ” dell'arte simulando delle 
turbolenze in formato sintetico 


LEONARDO AL COMPUTER 




/ 



on sono affatto d’accordo 
con quei due sperimentatori 
informatici d’oltreoceano i 
quali avrebbero recentemen¬ 
te affermato che le cosiddet¬ 
te invenzioni di Leonardo risultano in realtà 
inapplicabili dal punto di vista pratico. 
Un’attimo di attenzione non farebbe male 
prima di sostenere certi argomenti, in quan¬ 
to, anni fa, proprio una grossa industria a 
stelle e strisce sostenne un enorme battage 
pubblicitario basato proprio sui disegni di 
un CUSCINETTO A SFERA realizzato secoli 
e secoli addietro proprio da Leonardo. 
Ora, sarebbe interessante togliere i “dise¬ 
gni di Leonardo", ovvero i cuscinetti, dal 
differenziale, dal cambio, dai semiassi o 
dalle ruote di un’automobile dei suddetti ri¬ 
cercatori, per poi verificare se la pensano 
allo stesso modo. 

Ed è solo un pallido esempio di quanto 
Leonardo ci ha tramandato. 

L ’ALGORITMO E L ’IDEA 

Molto più modestamente e con inesausta 
ammirazione, mi sono reinvaghito del Som¬ 


mo Maestro, cercando di piluccarne qual¬ 
che tensione, qualche atmosfera che fosse 
applicabile con semplici algoritmi anche 
per il piacere culturale mio e dei lettori. 

Ma non ho pensato alla solita "Gioconda” 
rifatta al computer, una mera ricopiatura di 
infimo interesse, bensì, riosservando con 
piacere stralci del Codice Arundel (gli studi 
sulle acque), mi è balenata l’idea che alcuni 
aspetti di quella ricerca, sebbene più sem¬ 
plificati, si potessero realmente simulare. 
Nel programma originale, in verità, le for¬ 
mule che esprimevano i parametri per la 
forza d’urto di una massa d’acqua in movi¬ 


mento, erano regolate in modo assai più 
espanso (nel senso di lunghezza del pro¬ 
gramma) rispetto al listato di queste pagi¬ 
ne, tanto espanso da risultare non adatto 
ad una rubrica sciolta e dai listati brevi co¬ 
me sempre mi richiedete. 

Dunque, non ho fatto altro che sintetizzare 
l’algoritmo nei suoi passi più semplici, che 
ad ogni modo stabiliranno i medesimi risul¬ 
tati in video, togliendo ogni eccessiva fatica 
all’utente. 

Sintetizzato l’algoritmo di partenza, sono ri¬ 
masti, non proprio pochi, ancora 13 PARA¬ 
METRI sotto forma di variabili a vostra com- 
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pietà disposizione per mutare a piacere il 
corso delle fluttuazioni di un numero N di 
ellissi disegnate punto per punto dal calco¬ 
latore. Questo significherà avere anche un 
po’ di pazienza per veder stampata l'intera 
routine richiesta, per cui chi può disporre di 
un coprocessore matematico è bene che lo 
usi, nel mio caso, essendo i listati guida per 
MSX, ho pensato di immettere alcune va¬ 
rianti di linea per chi può disporre del Turbo 
XBasic Kun, e al proposito permettetemi di 
salutare Enzo Fina e gli amici del "Tur¬ 
bo-Club MSX". 

Non rimane che passare alla verifica dei 
parametri e al loro significato. 

DESCRIZIONE DEI PARAMETRI 

Tutti i parametri sono modificabili a piace¬ 
re, fermo restando che il listato base lavora 
su di una superficie di 256 colonne per 192 
righe, tenetene conto nel rapporto con la ri¬ 
soluzione grafica adottata dal vostro com¬ 
puter. 

Elenco e descrizione parametri: 

- CO; RI: (ora a 60 e 60) colonna e riga cen¬ 
tro prima ellissi 

- MA; MI: (ora a 30 e 20) lunghezza semias¬ 
se maggiore e minore prima ellissi 

- DX: (ora a .5) dato di decremento o incre¬ 
mento per parametro “MA" 

- DY: (ora a .5) dato di decremento o incre¬ 
mento per parametro “MI” 

- AL: (ora a 5) numero di allontanamento 
dal centro (CÓ;RI) per le successive ellissi 

- Al: (ora a 135) angolo della prima ellissi 

- A2: (ora a 20) angolo di rotazione succes¬ 
sive ellissi 

- A3: (ora a 45) angolo tra i centri delle ellissi 

- NE: numero delle ellissi da stampare 

- PE: punti descriventi l’ellissi 

- CL: (ora a 2 = verde) codice colore del 
tratto 

Modificate a piacere: CO,RI,MA e MI alla 
linea 140; DX,DY e AL alla linea 170; A1,A2 e 
A3 alla linea 150 e NE,PE e CL alla linea 160. 
Le maggiori soddisfazioni grafiche si trag¬ 
gono dalla diversificazione dei parametri: 
A1,A2,A3,DX,DY,AL e PE, nel loro insieme 
capaci di orientare l’intera struttura in suc¬ 
cessioni molto complesse e costituite dai 
punti guida (parametro PE) dell'ellissi, i 
quali, in forza di una maggiore o minore vi¬ 
cinanza dei pixel attivati, rinnovano l’aspet¬ 
to di una figurazione anche non variando 
gli altri parametri. 

Nei computer con altissima risoluzione, il 
parametro "AL" risulta il più efficace da un 
punto di vista scenico, cosa che natural¬ 


mente può far aumentare a dismisura il pa¬ 
rametro “NE", come abbiamo visto decre¬ 
tante il numero delle ellissi risolvibili su vi¬ 
deo. In ogni caso, se siete incerti sull’uso 
appropriato dei parametri, avviato il pro¬ 
gramma questo vi darà già un primo esem¬ 
pio di “turbolenza” che non mancherà di 
stupirvi. 

In coda al programma, nelle sottostanti 
REM, oltre alle varianti per il TURBO-MSX, 
troviamo quelle per gli elaboratori con alta 
risoluzione colore, e al riguardo, per i lettori 
che l’hanno chiesto, hi-res colore (o “bit- 
mapped") significa: la possibilità per un 
computer in pagina GRAFICA di stampare 
anche l’uno accanto all’altro dei punti di di¬ 
verso colore senza alcuna limitazione, limi¬ 
tazione che ad esempio negli MSX1 è di 2 
colori (primo piano e sfondo) per ogni 8 pi¬ 
xel della stessa riga. 

Tornando alle varianti assai semplici per 
l’immissione dei colori, desidero rilevare 
che questa volta, come spesso accade per 
le foto d’autore, il supporto pluricromatico 
non dico che guasti l’insieme dell’immagi- 
ne, ma certo non ne scandisce un’alternati¬ 
va ridondante; ma forse questa è una visio¬ 
ne solamente soggettiva e probabilmente 
plagiata dal disegno di Leonardo che ho 
sotto gli occhi, denominato: "Diluvio” ed 
eseguito a carboncino, da qui probabil¬ 
mente la mia preferenza monocromatica; 
per la cronaca il disegno è stato eseguito 
all’incirca nell’anno 1515. 


IN EUROPA CON LEONARDO 

Dare dei cenni bibliografici sotto le vacanze 
estive?! 

Pura follia! Non c’è né il tempo né la voglia 
di rinchiudersi in libreria, piuttosto, se come 
me quando viaggiate in Italia o all’estero 
amate godere anche della cultura raccolta 
in quelle tali località, ecco una piccola 
mappa per ritrovare in giro per l’Europa un 
Leonardo quasi inedito ai più. 

Nel piccolo vademecum turistico-leonarde- 
sco che vi propongo, citerò dapprima la lo¬ 
calità, quindi l’argomento ed infine il museo 
di appartenenza. 

- Milano - Codice Atlantico - Pinacoteca 
Ambrosiana. 

- Gran Bretagna: Windsor - Studi di Archi¬ 
tettura - Castello di Windsor. 

Parigi - Studi sulla luce - Institut de France. 
Londra - Studi sulle acque; codice Arundel 

- British Museum. 

Torino - Studi sui volatili - Biblioteca Reale. 
Londra - Studi sui volatili - Victoria and Al¬ 
bert Museum. 

Madrid - Studi sulle macchine/Fusione del 
“cavallo" - Biblioteca Nazionale. 

Mi piace chiudere la presente puntata di 
computergrafica proprio con un frase em¬ 
blematica di Leonardo: "il pittore non è lau¬ 
dabile, se egli non è universale", cioè se 
non conosce profondamente la realtà che 
lo circonda; alla categoria dei pittori, comun¬ 
que aggiungerei quella degli informatici. ■ 
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ARCHIMEDES 


Archimede vs 
Mandeibrot 



di DANIELE CANONACO 

Ancora sul famigerato frattale di Mandel- 
brot? Perché T n fondo se Archimede Pita¬ 
gorico avesse posseduto un personal sicu¬ 
ramente avrebbe scoperto la geometria 
frattale oltre 2.000 anni prima 


h I programma è scritto in BBC 

à ■ BASIC, usando esclusiva- 

I m mente la programmazione 

“■■■ strutturata, quindi non è dif¬ 

ficile da decifrare, per chiun¬ 
que voglia fare delle modifiche. 

Non è molto veloce, ma il calcolo di una 
schermata rimane nel giro dei minuti, an¬ 
che se non ho provato fino in fondo la ca¬ 
pacità dello zoom, che si può fare da una 
qualunque immagine appena calcolata o 
caricata dal disco. 

Infatti il programma mantiene i dati riguar¬ 
danti i valori di z (nella formula z = z 2 + c) 
nella matrice [XDAT(), YDATQ] e li salva 
nella directory MandelDat come semplici fi¬ 
le numerici, mentre salva le immagini come 
tali nella directory MandelPic. 



VDUl,27,1,71 

>L. 

10REM > *.Mandel.Mandeibrot 

20REM **************************************************** 

30REM * Insiemi di Mandeibrot: calcolo e visualizzazione * 

40REM * grafica, 256 colori, risoluzione: 256x256 * 

50REM ******************* CD-SOFT -1988 ******************* 

60M0DE 13 

70 OFF: OSCLI"pointer 0": PROC_Start: PROC_Mask 
80 ON ERROR PROC_Error 
90 LOADASC ON 
100REPEAT 
110 REPEAT 

120 OSCLI"FX 21,9": LOADASC X7.,Y7.,B7. 

130 IF X7.C1024 AND ZOOM*/. THEN 

140 GCOL 4,63: LINE 0, Y%, 1023, Y%: LINE X*/.,0, X7., 1023 

150 GCOL 4,0: LINE 0,Y7. t 1023,Y%* LINE X7.,0, X’/., 1023 

160 SAVE 

170 UNTIL B7.O0 

180 IF X7.C1024 THEN 

190 IF B7.=4 THEN 

200 IF ZOOM*/. THEN 

210 IF NOT Z0M7. THEN 

220 XZ17.= X7.: YZ17.=Y7.: x 1=XDAT < X7./4) : y 1 =YDAT ( Y7./4) 

230 GCOL 4,63: LINE 0, YZ17., 1023, YZ17.: LINE XZl*/.,0, XZl*/., 1023 

240 XZ27=-1 : YZ2*/.=-l: ZOM*/.=TRUE: PROC_Wai t <. 2) 

250 RENUMBER 

260 x2=XDAT(X*/./4) : y2=YDAT (Y7./4) : XZ27.=X*/.: YZ27.=Y7. 

270 GCOL 4,63: LINE 0, YZ27., 1023, YZ2*/.: LINE XZ27.,0, XZ27., 1023 

280 PROC_MinMax(xl,x2,XBOT,XTOP): PROC_MinMax(y1,y2,YBOT,YTOP) 

290 Z0M7.=FALSE: ZOOM*/.=FALSE: PROC_Wai t (. 2) 

300 SAVE 

310 SAVE 

320 RENUMBER 

330 PROC_ZoomReset 

340 SAVE 

350 RENUMBER 

360 LOADOPENIN FN_Opt i on ( Y*/.) NEW 

370 LIST 1: PROC ZoomReset: ZOOM*/.=TRUE 
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380 

LIST 

2: 

IF NOT ZOOMX THEN LOADASC OFF: PROC_Mandel: LOADASC 

390 

LIST 

3: 

PROC_LoadScreen 

400 

LIST 

4: 

PROC_SaveScreen 

410 

LIST 

5: 

«desktop 

420 

LIST 

6: 

VDU20 

430 

LIST 

7: 

PROC Blue 

440 

LIST 

8i 

PROC_Red 

450 

LIST 

9: 

PROC Green 

460 

LIST 

10: 

PROC_Yel1ow 

470 

LIST 

11: 

PROC Cyan 

480 

LIST 

12: 

PROC_CatUp : PROC_Wait(.2) 

490 

LIST 

13: 

PROC_CatDown » PROC_Wait(.2) 

500 

OLD 




510 SAVE 
520UNTIL FALSE 


540REM ************************************************************** 
550REM * procedure di gestione delle immagini e dei dati su disco * 

5700EF PROC__LoadScreen 
580L0CAL iX,*X,** 

590 IF NOT OLDFX THEN 

600 PROC_ZoomReset; VDU24,0;0;1023;1023?: OLDFX=TRUE 

610 OSCLI"ScreenLoad *. Mandel.MandelPie."+CAT*(FILEX) 

620 *X«0PENIN("*.Mandel.MandelDat."*CAT#(FILEX)) 

630 FOR iX-0 TO DIM(XDAT(),1): INPUT#*X,XDAT(iX)i NEXT 

640 FOR iX«0 TO DIM(YDAT(),1): INPUT#*X,YDAT<iX)s NEXT 

650 CLOSE#*Xi VDU26i NEWFX~FALSE 

660 SAVE 
670ENDPR0C 

690DEF PROC_SaveScreen: LOCAL iX,*X 
700 IF NEWFX THEN 

710 PROC_Catalog(FILEX): VDU24,0;0;1023;1023; 

720 OSCLI"ScreenSave *.Mandel.MandelPic.Mand"♦STR*(FILEX) 

730 IF FILEX«MAXX THEN 

740 *X«OPENOUT(Mandel.MandelDat.Mand"+STR$(FILEX)) 

750 FOR iX»0 TO DIM(XDAT(),1): PRINT#*X,XDAT(1X): NEXT 

760 FOR iX»0 TO DIM(YDAT(),1): PRINT#*X,YDAT(iX)r NEXT 

770 CLOSE#*X: *X«OPENOUT(Mandel.MandelDat.Fi1eNumber") 

780 PRINT#*X,MAXX: CLOSE#*X: VDU26: NEWFX«FALSE 

790 SAVE 

800 SAVE 

810ENDPR0C 

830DEF PROC_CatUp 

840 IF FILEX>1 THEN OLDFX«FALSE: FILEX-»ll PROC_Catal og(FILEX) 

850ENDPR0C 

870DEF PROC_CatDown 

880 IF FILEX<MAXX THEN: OLDFX*FALSE: FILEX*«1: PROC_Catalog(FILEX) 
890ENDPR0C 

910DEF PROC__Catal og (i X) 

920 6C0L Os LOADHIMEM LOADPAGE 1056,44,200,88: GCOL 63 
930 MOVE 1060,100: VDU5: PRINT CAT*(iX>: VDU4: OFF 
940ENDPR0C 

960REM ************************************************************** 


970REM * procedure di modifica della palette dei colori in MODE 13 


980REM *********************< 

990DEF PR0C_Blue: LOCAL cX 
1000 NEWFX=TRUEi FOR cX«0 TO 
1010ENDPR0C 

1030DEF PROC_Red: LOCAL cX 
1040 NEWFX=TRUE: FOR cX*0 TO 
1050ENDPR0C 

1070DEF PROC_Green: LOCAL cX 
1080 NEWFX*TRUE: FOR cX=0 TO 
1090ENDPR0C 

1110DEF PROC Yellow: LOCAL cX 
1120 NEWFX*TRUE: FOR cX«0 TO 
1130ENDPR0C 

1150DEF PROC_Cyan: LOCAL cX 
1160 NEWFX-TRUE: FOR cX=0 TO 
1170ENDPR0C 

1190REM **##*##*#****#****#**h 


255: 

COLOUR 

cX,0,0,255: 

NEXT 

255: 

COLOUR 

cX,255,0,0: 

NEXT 

255: 

COLOUR 

cX,0,255,0: 

iX+*l: NEXT 

255: 

COLOUR 

cX,255,255, 

0: NEXT 

255: 

COLOUR 

cX,0,255,255: NEXT 


**■ 


1200REM • procedura di calcolo visualizzazione e memorizzazione dati 
1210REM ************************************************************ 
1220DEF PROC Mandel 


1230L0CAL CImag,CReal,ZImag,ZReal,SX,SY,CountX,X(),Y() 
1240 DIM X(ARRAYX),Y(ARRAYX) 

1250 CAT*(MAXX+1)Mand M +STR#(MAXX+1) 

1260 PROC_Catalog(MAXX+1) 

1270 PROC — Window(XBOT,YBOT,XTOP,YTOP) 

1280 FOR CImag=YBOT TO YTOP STEP SY*4 
1290 Y(FN_IntY(CImag)/4)«CImag 

1300 FOR CReal«XBOT TO XTOP STEP SX*4 

1310 X(FN_IntX(CReal)/4)«CReal 

1320 CountX«0: ZImag=0.0: ZReal*0.0 

1330 LOADACS (ZReal~2+ZImag~2<«4.00) AND (CountX<64) 

1340 Temp«ZReal ~2-Z Imag^+CReal 

1350 ZImag«2*ZImag*ZReal-»CImag 

1360 ZReal«Temp: CountX*«l 


* 


* 


ON 




Allo starting del programma si avrà una 
schermata con le icone delle opzioni sulla 
destra e l’immagine dell’insieme standard 
che si trova alle coordinate -2.25,2.25 sia 
sulle ascisse che sulle ordinate. 

Le opzioni disponibili con il tasto select so¬ 
no nell’ordine: 

ZOOM: Clickando sull’icona e andando poi 
suH’immagine si può selezionare un rettan¬ 
golo piccolo a piacere che verrà ingrandito 
a tutto schermo. 

Per ritrattare premere uno degli altri due 
pick. 

COMPUTE: Una volta selezionato il rettan¬ 
golo di zoom, clickando sull’icona verrà 
/calcolata la nuova immagine. 

Per ritrattare premere ESCAPE. 
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1370 EDIT 

1380 GCOL CountX: LOADLOMEM FN__IntX (CReal ) ,FN_IntY (CImag ) 

1390 NEXT CReal 
1400 NEXT CImag 

1410 MAXX+=1 : FILEX=MAXX: XDAT()=X()i YDATO=Y<>: NEWFX=TRUE: VDU7 
1420ENDPR0C 

1440REM ************************************************************** 
1450REM * procedure di trasformazione in coordinate cartesiane reali * 
1460REM ************************************************************** 

1470DEF PR0C_Window(x1,y1,x2,y2) 

1480 SX=(x2-xl)/SUPX : SY= (y2-yl > /SUP7. 

1490 FX=SUPX/<x2-xl> : FY=SUPX/<y2-y1> 

1500 CX=-xl*SUPX/<x2-xl) s CY=-y 1*SUPX/ (y2-yl ) 

1510ENDPR0C 

1530DEF FN__IntX (x ) = INT <FX*x+0. 5+CX) 

1550DEF FN_IntY(y)=INT(FY*y+0.5+CY) 

1570DEF FN_RealX<xX)*<xX-CX)/FX 
1590DEF FN_Real Y ( y7. ) = ( y7.-CY ) /FY 

1610REM ************************************************************** 
1620REM * -funzione di riconoscimento delle opzioni * 

1630REM ************************************************************** 

1640DEF FN_0ption<yX> 


1650 

IF 

yXX> 

AND 

yX<40 

THEN 

= 13 

1660 

IF 

yX>132 

AND 

yX<184 

THEN 

= 12 

1670 

IF 

yX>184 

AND 

yX<218 

THEN 

= 11 

1680 

IF 

yX>218 

AND 

yX<250 

THEN 

*10 

1690 

IF 

yX>250 

AND 

yX< 280 

THEN 

=9 

1700 

IF 

yX>280 

AND 

yX< 312 

THEN 

=8 

1710 

IF 

yX>312 

AND 

y7.<344 

THEN 

=7 

1720 

IF 

yX>344 

AND 

yX<376 

THEN 

=6 

1730 

IF 

yX>430 

AND 

yX< 550 

THEN 

=5 

1740 

IF 

yX >550 

AND 

yX<670 

THEN 

=4 

1750 

IF 

yX>670 

AND 

yX<790 

THEN 

*3 

1760 

IF 

yX>790 

AND 

yX<910 

THEN 

=2 

1770 

IF 

yX>910 

AND 

yX<1023 

THEN 

= 1 


1780=0 

1800REM ************************************************************** 
1810REM * procedure di supporto * 

1S20REM ************************************************************** 
1830DEF PRQC_Star t : L0CAL f7. 

1840 SUP7.= 1023: ARRAY7.=255: FILE7.= 1 

1850 DIM XDAKARRAY7.) ,YDAT<ARRAYX) ,CAT$<100) 

1860 Z00MX=FALSE: ZQM7.=FALSE: PALX=TRUE: NEWF7.=FALSE 
1870 0LDF7.=FALSE; CAT$ < 0 ) = "ERR0R " 

1880 XZ17.=-1: YZ1X=-1: XZ27.=-1: YZ27.=-1 

1890 XB0T=-2.25: YB0T=-2.25s XT0P=2.25: YT0P=2.25 

1900 f 7.=0PENIN ( Mandel. Mandel Dat. Fi 1 eNumber M ) 

1910 INPUT#*X,MAXX: CL0SE#*X 

1920 FOR f7.= l TO MAXX: CAT$ (f X) ="Mand "+STR$ <fX) : NEXT 

1930ENDPR0C 

1950DEF PR0C_Mask 

I960 OSCLI"sioad $.Mandel.MandelIcs. zoom" 

1970 OSCLI"schoose zoom" : PLOT &ED,1050,910 
1980 OSCLI"sioad $.Mandel.MandelIcs.compute" 

1990 OSCLI"schoose compute": PLOT &ED,1050,790 
2000 OSCLI"sioad $.Mandel.MandelIcs.1oad" 

2010 OSCLI"schoose load" : PLOT &ED,1050,670 
2020 OSCLI"sioad $.Mandel.MandelIcs.save" 

2030 OSCLI"schoose save" : PLOT &ED,1050,550 
2040 OSCLI"sload $.Mandel.MandelIcs.exit" 

2050 OSCLI"schoose exit" : PLOT &ED,1050,430 
2060 OSCLI"sioad $.Mandel.MandelIcs.pai ette" 

2070 OSCLI"schoose palette": PLOT &ED,1050,184 
2080 OSCLI"sioad $.Mandel.MandelIcs.catalog" 

2090 OSCLI "schoose catalog": PLOT MED, 1050,4 
2100 PROC_Catalog(1): PROC_LoadScreen 
2110ENDPR0C 
2130DEF PROC Wait(n) 

2140 TIME=0: REPEAT UNTI.L TIME=n*100 

2150ENDPR0C 

2170DEF PR0C_Error 

2180 VDU7: PROC_Catalog(0): PR0C_Wait(1): PROC_Catalog(FILEX) 
2190ENDPR0C 

2210DEF PROC_MinMax(ni,n2,RETURN n3,RETURN n4) 

2220 IF nl=n2 THEN n3=nl: n4=n2 
2230 IF ni>n2 THEN n3=n2: n4=nl 
2240 IF nl<n2 THEN n3=nl: n4=n2 
2250ENDPR0C 

2270DEF PROC_ZoomReset 

2280 GCOL 4,0: LINE 0,YZ1X,1023,YZ1X: LINE XZ1X,0,XZ1X,1023 

2290 GCOL 4,0: LINE 0, YZ2X, 1023, YZ2X: LINE XZ2X,0, XZ2X., 1023 

2300 XBOT =-2.25: YB0T=-2.25: XT0P=2.25: YT0P=2.25 

2310 XZ1X=-1: YZ 1X=-1 : XZ27.=-1: YZ2X=-1 

2320 Z0M7.=FALSE: Z00M7.=FALSE 

2330ENDPR0C 



LOAD: Clickando sull’icona verrà caricata 
l'immagine indicata dall’opzione FILE, se 
questa non è già presente in memoria. 

SAVE: Clickando sull’icona verrà salvata 
l’immagine indicata dall’opzione FILE, se 
questa non è già presente sul disco. 

EXIT: Clickando sull’icona si esce nel desk¬ 
top. 

PALETTE: Clickando su uno dei colori di¬ 
sponibili verrà modificata la palette dell’im¬ 
magine corrente. 

FILE: Clickando sull’opzione UP si risale 
nell'elenco delle immagini presenti sul di¬ 
sco, clickando su DOWN si scende fino al¬ 
l’ultima immagine. 

I miglioramenti possibili sono diversi, a par¬ 
tire dalla procedura di calcolo, ma ci sono 
delle cose che non possono essere modifi¬ 
cate, come il passo dei due cicli FOR, che 
viene moltiplicato per 4 a causa della riso¬ 
luzione del BASIC di 1024*1024 e dello 
schermo di 256*256, e di conseguenza l'in¬ 
dice di memorizzazione nella matrice che 
viene diviso della stessa quantità. 

Non ho utilizzato dei cicli interi per una 
maggiore precisione e fedeltà all’algoritmo 
teorico, però ritengo che se tradotto in AS¬ 
SEMBLER darebbe ottimi risultati, perciò se 
c’è qualcuno in grado di farlo... 

È possibile salvare delle immagini e poi ri¬ 
calcolarle con il programma per potersi di¬ 
vertire entrando con gli zoom nei “cuori" 
dei queste. 

La directory Mandellc contiene le icone del 
menu mediante le quali di accede alle varie 
opzioni. 

La directory MandelDat contiene le imma¬ 
gini calcolate dal programma stesso. 

La directory MandelPit contiene le immagi¬ 
ni che Mandel deve calcolare. 

NOTA BENE: I file che appaiono nelle foto¬ 
grafie sono stati creati mediante successivi 
ZOOM delle immagini ottenute. ■ 
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Disk Menu 

PER ARCHIMEDES 


di FRANCESCO DURANTI 

Questo programma è stato scaricato nella 
nostra banca dati da un utente che ringra¬ 
ziamo vivamente e, data la sua utilità per 
chi ha un ARCHIMEDES, vi diamo alcune 
informazioni per capire come usarlo 


opo aver mandato in esecu¬ 
zione il programma RMENU 
verrà implementato un nuo¬ 
vo comando per la gestione 
dei dischi che racchiude in 
se le istruzioni fondamentali per operare 
con il drive. 

Per richiamarlo basterà digitare “MENU” e 
vi ritroverete in uno schermo suddiviso in 
varie parti su cui potrete notare che: 

La prima riga contiene il titolo del program¬ 
ma, la data e l’ora corrente. 

L’ultima contiene alcune indicazioni a ri¬ 
guardo del file su cui è posizionato il curso¬ 
re (nome del file, tipo del programma, data 
e ora dicreazione, lunghezza, etc. etc..) 

Inoltre tra queste due linee vi sono tre aree: 

Area comandi: contiene i vari comandi a 
cui si può accedere. 

Area info: contiene alcune informazioni ri¬ 
guardanti il disco. 

Area file: contiene i nomi dei file e delle sot¬ 
to-directory presenti sul disco. 

A seconda del colore del file questo è: 

File non selezionato Scritte rosse su sfondo 
grigio. 

File selezionato Scritte grigie su sfondo ros¬ 
so 

Sotto-directory non selezionata Scritte 
bianche su sfondo grigio 



Sotto-directory selezionata Scritte grigie su 
sfondo bianco 


Il cursore si muove sullo schermo per mezzo 
del mouse ed i tre pulsanti, che d’ora in 
avanti chiameremo “key 1”, "key2" e “key 
3”, serviranno a selezionare un comando, 
aprire una sotto-directory o ad eseguire un 
file se uno dei tre viene premuto due volte. 
Premendo una volta sola uno dei tasti su 
un file, questo verrà selezionato, su un co¬ 
mando, a seconda di qual’è, verranno set¬ 
tati i parametri. Per effettuare una selezione 
o per togliere la selezione su tutti i file baste¬ 
rà premere due volte un tasto su (UN)TAG. 

L’area info contiene i seguenti dati: 

Dir: Nome della corrente directory. 

Tit: Titolo dell directory. 

Dsc: Nome del disco. 

Lib: Directory delle librerie. 

Urd: User directory. 

Tgf: numero di file selezionati/numero file 
totali. 

Tby: numero byte dei file seleziona¬ 
ti/numero di byte totale dei file. 

Free: Spazio libero sul disco. 

Passiamo ora ad analizzare i comandi a cui si 
può accedere tramite questo programma: 

MOUNT x: Serve per attivare il drive numero ’x’. 
DELFTE: Cancella dal disco i file selezionati. 


COPY: Copia i file e le sotto directory sele¬ 
zionate sul percorso (:drive.dir1.dir2.etc) 
desiderato. 

Si possono settare alcune opzioni premen¬ 
do i tasti del mause una sola volta sul co¬ 
mando copy: 

KEY 1 (R): Copia delle sotto-directory. 

KEY 2 (P): Richiede l’inserimento del disco 
sorgente e di quello destinazione aspettan¬ 
do che venga premuto un tasto. 

KEY 3 (F): Forza la sovrascrittura del file de¬ 
stinazione in caso già esista. 

ACCESS: Rende il file accessibile solo in let¬ 
tura, scrittura, lettura/scrittura,protetto. 

Si possono inoltre settare queste opzioni: 

KEY 1 (R): Il file è accessibile in lettura 
KEY 2(W): Il file è accessibile in scrittura 
KEY 3(L): Il file è "lockato", protetto 
DIR : Seleziona la directory principale 
SETTYPE: Setta il tipo dei file specificati. 

KEY 1: Decrementa di uno il tipo. 

KEY 2: Incrementa di uno il tipo. 

RENAME: Rinomina i file selezionati con 
quelli richiesti all’input. 

TYPE: Visualizza sullo schermo il contenuto 
in formato ASCII (testo) dei file specificati. 
DUMP: Visualizza sullo schermo il contenu¬ 
to in esadecimale ed in formato ASCII (te¬ 
sto) dei file specificati. 

QUIT: Esce dal programma e rientra nel si¬ 
stema operativo. 

Per bloccare lo scrolling del file premere il 
tasto SCROLL LOCK. 

Per il programma, completamente scritto in 
linguaggio Basic, avremmo potuto stam¬ 
parlo, ma di fronte ad un sorgente di 30 pa¬ 
gine, abbiamo creduto opportuno metterlo 
a disposizione a richiesta presso la redazio¬ 
ne, o per chi ha il modem scaricarselo dalla 
nostra Bbs, di cui ripetiamo i parametri 
06/7665495 300/1200/2400 8n1. ■ 
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UN COMANDO 
Al GIORNO... 


LE PROCEDURE BATCH 


di ANDREA GIORGI 


Quando un computer viene avviato la pri¬ 
ma cosa che fa è cercare ed eseguire una 
specifica procedura batch, il file Autoe¬ 
xec.bat, che noi per tale motivo abbiamo 
definito procedura batch per eccellenza 


n file Autoexec.bat permette 
l’esecuzione immediata ed 
automatica di un program¬ 
ma all’atto dell’avvio del- 
l’MS-DOS. 

n effetti quando si avvia una macchina la 
prima operazione compiuta dal sistema 
operativo caricato è ricercare il file Autoe¬ 
xec.bat nella directory principale e, quindi, 
mandarlo in esecuzione. 

Nel caso in cui tale file non fosse trovato il 
sistema procederebbe con la richiesta di in¬ 
serimento della data e dell’ora. 

Ma forse il tutto vi risulterà più semplice e 
più chiaro osservando lo schema riportata 
qui a lato. 

CREARE UN FILE AUTOEXEC.BAT 

Prima di dare uno sguardo a come è possi¬ 
bile creare un file autoexec.bat è bene ricor¬ 
dare che è necessario che tale file venga 
creato, appunto, o meglio risieda, nella di¬ 
rectory principale del disco MS-DOS. 

Detto questo possiamo passare a spiegare, 
con un piccolo esempio, il metodo, nonché 


le caratteristiche salienti, che ci permettono 
di ottimizzare al meglio la funzionalità di un 
file autoexec.bat. 

Se, ad esempio, noi volessimo che all’atto 
del boot della macchina fosse caricato im¬ 
mediatamente il GW-BASIC e quindi ese¬ 
guire un programma dal nome LIST.PRG, 
creeremo un file autoexec nel seguente mo¬ 
do. 

Il primo comando da digitare è: 

COPY CON AUTOEXEC.BAT 

per tutti i più scordarelli, visto che tale co¬ 
mando è già stato spiegato in un preceden¬ 
te numero di LIST, facciamo notare che con 
questa dicitura si indica a MS-DOS di co¬ 
piare tutto ciò che verrà digitato su tastiera 
nel file AUTOEXEC.BAT. 

Dopo aver fatto ciò passiamo alla creazio¬ 
ne vera e propria del file attraverso i se¬ 
guenti comandi: 

DATE 
TIME 
PATH ; 

PROMPT [$p] 

CLS 

GWBASIC LIST.PRG 

al termine dell’ultima riga la pressione con¬ 
temporanea dei tasti CTRL-Z e quindi del 
tasto RITORNO provocherà la scrittura di 
tali righe nel file Autoexec.bat. 

Vediamo ora di spiegare come abbiamo im¬ 
postato il nostro file autoexec.bat. 
Innanzitutto i primi due comandi, Date e Ti¬ 
me, vengono utilizzati per l’inserimento e 
quindi l’impostazione della data e dell'ora, 
appunto. 


Il comando seguente (path) serve ad impo¬ 
stare il percorso per la ricerca dei comandi, 
mentre il comando Prompt imposta il 
prompt che riteniamo opportuno. 

I comandi seguenti vengono utilizzati: uno 
per ripulire lo schermo (CLS) e l’altro per 
caricare GW-BASIC e quindi eseguire il pro¬ 
gramma LIST.PRG. 

Come è facile notare da questo breve 
esempio in un file Autoexec come in un’al¬ 
tra qualsiasi procedura batch è possibile 
inserire, una indefinita quantità e varietà di 
comandi purché siano MS-DOS mi racco¬ 
mando. 

II modo in cui noi abbiamo creato il file Au¬ 
toexec o una procedura batch come meglio 
crediamo non è sicuramente l'unico, po¬ 
tremmo, infatti, anche usare il comando 
Edlin, ma è sicuramente quello che noi rite¬ 
niamo più opportuno data una maggiore 
velocità e facilità d’uso. 

PROCEDURE BATCH CON 
PARAMETRI SOSTITUIBILI 

A volte potremmo aver bisogno di dover uti¬ 
lizzare una stessa procedura batch più vol¬ 
te ma ogni volta con gruppi di valori diversi. 
È possibile quindi creare un file batch con 
parametri sostituibili o simbolici dove ogni 
parametro rappresenta una opzione di co¬ 
mando definita dall’utente. 

I parametri, i cui nomi vanno da %0 a %9, 
manterranno il valore assegnatogli dal¬ 
l’utente all’atto dell'Inserimento del coman¬ 
do batch. 

Per capire meglio l’utilizzo di questi strani 
parametri sostituibili cerchiamo di fare un 
esempio e di spiegarlo insieme. 
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Creiamo, ad esempio, una procedura batch 
chiamata sorter.bat il cui compito sia quello 
di riordinare file contenenti una specifica 
sequenza di caratteri. 

Ogni qual volta lanciamo in esecuzione il fi¬ 
le Sorter non dovremo far altro che indica¬ 
re: la stringa, il file in cui cercarla e il file 
temporaneo utilizzabile per il riordinamen¬ 
to. Sorter stamperà così l’elenco risultante. 
Eccovi la nostra procedura più ottimale: 

type %2 3 find "%V > %3 
type %3 3 sort > prn 
del %3 

All’atto dell’esecuzione del file l’MS-DOS 
sostituisce in sequenza i vari parametri del¬ 
la procedura con quelli specificati. 

Se si fa uso del parametro %0 il sistema 
operativo lo sostiuirà sempre con il nome 
del file batch o con quello dell’unità se è 
stato specificato. 

Avvertenze utili. 

Se si avesse la necessità di utilizzare più di 
10 parametri (%0-%9) dovremo far uso 
dello speciale comando Shift che spieghe¬ 
remo più in seguito. 

Se invece si utilizza il segno percentuale 
(%) come parte integrante del nome di un 
file allora lo si dovrà digitare due volte con¬ 
secutive. 

Prendete cinque minuti di pausa ma non di 
più perché stiamo per rituffarci nel mondo 
dos con il comando Restore 

IL COMANDO RESTORE 

In un nostro precedente numero di List par¬ 
lammo dell’utilizzo del comando Backup. Ci 
sembra ora opportuno, perciò, concludere 
quel discorso iniziando questa nostra rubri¬ 
ca con il comando Restore 

I meno esperti o meglio i principianti sfa¬ 
ranno certamente chiesti: perché? La rispo¬ 
sta sta tutta nella funzione vera e propria 
del comando Restore. Questo comando 
serve, infatti, per ripristinare su disco dei file 
che sono stati precedentemente salvati tra¬ 
mite Backup. 

Vediamo subito la sintassi del comando: 

RESTORE <d:>[<nome percorso»] [/S] [/P] 
[/B:<data>] [/A:<data>] 

[/E:<ora>] [/L:<ora>] [/M] [/N] 

<d> indica l’unità dove si trovano i file da 
” restorare”. 


<nome percorso» indica, ovviamente, il per¬ 
corso dei file da ripristinare. 

/S indica al sistema che devono essere ri¬ 
pristinate anche tutte le sottodirectory pre¬ 
senti sul disco. 

/P indica al sistema di chiedere all’utente 
l’approvazione prima di ripristinare un file 
nascosto, un file a sola lettura o un file che 
è stato modificato dopo l’esecuzione del¬ 
l’ultimo backup. 

/B indica di ripristinare solamente quei file 
che sono stati modificati prima di una certa 
data specificata. 

/A indica che devono essere ripristinati solo 
quei file modificati dopo di una data specifi¬ 
cata. 

/E indica che devono essere ripristinati solo 
quei file modificati prima di un'ora specifi¬ 
cata. 

/L indica che devono essere modificati solo 
quei file modificati dopo di una data ora. 

/M indica al sistema di ripristinare solo quei 
file modificati dopo l’ultimo backup. 

/N indica di ripristinare solo i file che non 
esistono piu sul disco di destinazione. 

Esempio: 

Se volessimo rispistinare tutti i file e tutte le 
directory presenti su di un dischetto inserito 
nel drive A: nel disco fisso C: indicheremo: 

RESTORE A:C: /S 

IL COMANDO COPY 

Il comando Copy è sicuramente quello del 
sistema operativo MS-DOS più usato dagli 
utenti. 

La sua ovvia funzione è quella di copiare fi¬ 
le di qualsiasi tipo, in qualsiasi directory, su 
qualsiasi disco. 

Forse, però, non tutti ne conoscono a pieno 
le potenzialità ed è scopo, appunto, di que¬ 
sto breve articolo aiutare coloro che ne fan¬ 
no un uso parziale o errato e coloro che, 
essendo alle prime armi, ne vogliono sape¬ 
re di più, il tutto tramite una serie di semplici 
esempi. 

Prima di iniziare ci sembra opportuno ricor¬ 
dare che il comando copy può essere an¬ 
che usato per concatenare uno o più file. 


COPIARE FILE 

In questa modalità di utilizzo sono previsti 
tre parametri aggiuntivi: 

/V questo parametro ordina al sistema ope¬ 
rativo la verifica di corretta scrittura dei set¬ 
tori nel disco di destinazione. 

/A e /B indicanti rispettivamente file di tipo 
ASCII e file di tipo Binario. 

Esempi: 

copy b:list.prg 

il file list.prg situato sull’unità b: viene copia¬ 
to, con lo stesso nome, nella directory cor¬ 
rente. 

copy b:list.prg a: 

in questo caso il file list.prg verrebbe creato 
nell’unità disco a: invece che nel direttorio 
corrente. 

copy b.list.prg edicomp.prg 

viene creato un file edicomp.prg identico al 
file list.prg, il tutto sull'unità b:. 

copy b:list.prg a:edicomp.prg 

in questo caso il file edicomp.prg, identico a 
list.prg, verrebbe creato nell’unità a:. 

Nel caso non venisse indicato nessun nome 
di unità tutte le letture e le scritture di file sa- 
rebbere effettuate nella directory corrente. Si 
ricorda all’utente che è possibile far uso dei 
caratteri jolly consentiri dall'MS-DOS. 

CONCATENARE FILE 

Per fare una concatenazione di file basta 
elencare ogni file da concatenare, sepa¬ 
randoli però uno dall’altro da un un segno 


Esempio: 

copy filel prg + file2.prg + ... + filen.prgfi- 
le.lst 

in questo modo verrebbe creato un file ”fi- 
le.lst" risultante dall’unione dei file elenca¬ 
ti precedentemente. 

Anche in questo caso è possibile far uso dei 
caratteri jolly, con le dovute accortezze. 
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SUPER MSX 2 
& VIDEO DIGITALI 


di OSVALDO CONTENTI 

Come il mese scorso affidiamo a queste 
pagine il compito di presentare un nuovo 
disk per tutti gli MSX 2 dal nome: “Ima¬ 
go”. Ovverossia un perfetto “laboratorio 
fotografico ” per più di 2500 variazioni di 
colore/grafismi/solarizzazioni 


h MAGO è la dizione poetica di 
è 1 immagine e, chi avrà il fiuto 

I u di acquistare questo dischet- 

to, si renderà conto realmen¬ 
te di possedere uno strumen¬ 
to di "poesia tecnologica”, in quanto, le im¬ 
magini, da voi possedute o quelle regalate 
nel disk, subiranno delle continue e favolo¬ 
se trasformazioni nel campo del colore, del 
grafismo in ogni sua forma, della solarizza¬ 
zione più complessa, tali da meritare a pie¬ 
no il titolo dato a questo dischetto. 

Per spiegarmi meglio, vorrei chiarire che 
tutte le modificazioni sino ad ora ottenibili 
solo in un laboratorio fotografico provvisto 
di un sofisticato sistema sottrattivo e con 
apparecchiature assai costose, saranno 
ora alla vostra portata semplicemente pre¬ 
mendo UN TASTO! 

E badate che non è una panzana, poiché il 
sottoscritto ha passato ore ed ore in came¬ 
ra oscura con ingranditore e filtri a colori, 
sudando sempre sette camice per ottenere 
ciò che adesso, in un attimo, può elargirci il 
nostro MSX 2. 

Eppure il materiale di questa "fusione fred¬ 
da” fra computer ed elaborazione di tipo 
fotografico, era già implicitamente presente 


nel nostro beneamato elaboratore; si è trat¬ 
tato infatti solo di sfruttare a pieno queste 
facoltà preesistenti percependone le innu¬ 
merevoli applicazioni, assieme, sia chiaro, 
ad una piccola invenzione che ora andrò a 
spiegare dettagliatamente ai patiti della 
programmazione. 

Tale spiegazione sarà di conforto anche 
per quanti non potranno spendere i soldini 
per il dischetto, poiché le nuove idee, se¬ 
condo il mio punto di vista, devono viaggia¬ 
re libere e non meschinamente rinchiuse in 
un discorso di mercato. 

COME FUNZIONA ‘IMAGO 99 

Per ottenere le appena citate modificazioni 


grafico-coloristiche ho fatto uso principal¬ 
mente dei suffissi (nel manuale: operazio¬ 
ni): TPSET, TOR, TXOR, TAND. AND, TPRE- 
SET, PRESET; questi per la prime 7 elabora¬ 
zioni. 

Tali suffissi sono stati usati fruendo del¬ 
l’istruzione di trasferimento COPY ed il 
meccanismo è semplicissimo: 

1. Traslare l’immagine caricata dalla prima 
alla seconda pagina 

2. Scegliere un colore di sfondo fra i 256 e 
riempirne la prima pagina 

3. Traslare ora l'immagine dalla seconda 
pagina alla prima utilizzando uno dei suf¬ 
fissi indicati. 

Saranno proprio le stesse "operazioni" a 
mutare del tutto o in parte l’immagine origi- 
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naie, la quale non andrà mai persa poiché 
residente sempre nella seconda pagina. 
Ora è intuibile che istituendo una tastiera 
adeguata, richiamante un’operazione sem¬ 
pre diversa, avremo 256 variazioni per ogni 
operazione richiesta (salvo rare eccezioni 
che vedremo), ed il gioco è fatto. 
Giocando con questo sistema, ho inserito 
in seguito: un effetto CIRCLE ed un effetto 
GRAFISMO, dove il primo si differenzia dai 3 
punti appena esposti solo nel secondo, in 
quanto invece di riempire lo schermo di un 
solo colore, questo viene invaso da cerchi 
pieni concentrici i quali esprimono delle to¬ 
nalità molto vicine a quella scelta, restituen¬ 
do. una volta dato seguito al punto 3, una 
suggestiva miscellanea fra immagine origi¬ 
nale e sfondo composito. Per il GRAFISMO, 
ancora nulla di più semplice, giacché l'im¬ 
magine della seconda pagina viene trasla¬ 
ta sulla prima spostando di una unità in più 
sia la colonna che la riga di ricollocamento, 
così tutti i colori complementari o semplice- 
mente coperti si annullano ed il GRAFISMO 
si attua come per incanto. Sia chiaro che 
tutte le variazioni (meno la CIRCLE per 
qualche secondo in più), vengono stampa¬ 
te su schermo all’istante, cioè il tempo di 
premere un tasto. Che pacchia, ragazzi! 

È davvero tutto per le spiegazioni anche se 
può apparire strano e non mi dite che non 
vi stia frullando qualche nuova idea in pro¬ 
posito; tante ancora sono le possibilità e ho 
già qualche ideuzza in cantiere, ma datemi 
tempo per sistemarla a dovere. 

Ed ora senza indugio passiamo alla vera e 
propria guida al programma che, come per 
il mese scorso sarà l’unico testo ad uso di 
IMAGO, tenetelo presente all’acquisto del 
dischetto. 

GUIDA AU USO DI “IMAGO” 

Il dischetto “IMAGO" è ad AUTOESECU¬ 
ZIONE, questo a seguito di molte richieste 
pervenuteci in tal senso. Ciò significa che 
ponendo il disk nel'drive A, premendo RE¬ 
SET e ed il tasto CTRL (per validare il solo 
drive A), il programma si autocarica, in al¬ 
ternativa, dopo RESET e CTRL, digitare: 
LOAD“IMAGO”,R. 

Subito dopo il titolo, una scritta in verde di¬ 
ce: Poni il disk con le immagini nel drive A e 
premi un tasto. Se non possedete immagini 
digitalizzate prelevate quelle regalatevi nel 
dischetto stesso di IMAGO, dette immagini 
hanno il nome file di: 

- TITOLO.PIC (l'immagine utilizzata per la 
copertina) 

- GRUPPO.PIC (un'immagine di Guerre 


Stellari) 

- NUDO.PIC (un disegno di mia creazione) 

- ADRIANA.PIC (un ritratto di Adriana Rus¬ 
so) (tutte le immagini sono richiamabili an¬ 
che da VIDEOGRAPHICS). 

CARICAMENTO IMMAGINI 

Scomparsa la scritta verde, apparirà la 
stampa dei file contenuti nel disk (nel drive 
A). Premere quindi: 

-1 4 tasti CURSORE per lo scorrimento dei 
titoli; il cursore in REVERSE si apporrà sulla 
prima lettera del nome del file 

- Tasto RETURN: per il caricamento del file 
scelto (si passa dopo il caricamento alle 
OPZIONI VARIAZIONI IMMAGINE) 



- Tasto ESC: per immettere un nuovo di¬ 
schetto 

OPZIONI VARIAZIONI IMMAGINE 

Indicazione generale: premete il tasto SE- 
LECT o CLR HOME per la scelta di un CO¬ 
LORE. quindi uno dei tasti dall’1 allo 0 per le 
variazioni già esposte. 

SCELTA DEI COLORE 

- Tasto SELECT: incrementa di una unità il 
codice colore di fondo per le variazioni (si 
parte da 0 e dopo 255 si torna a 0) 

- Tasto CLR HOME: appare un’Icona Colore 
(256 colori), scegliere una tinta muovendo i 
tasti CURSORE (NORD-SUD-EST-OVEST) ed 
infine RETURN per fissare il colore scelto. 
Potrete anche premere ESC per annullare 
l’operazione. 

Premuto RETURN, verrà stampato il codice 
colore scelto, anche nel caso che non ab¬ 
biate scelto nell’icona un nuovo colore. 
Non appena premuto RETURN, il program¬ 
ma visualizza il colore scelto nell’ultima va¬ 
riazione impostata con i tasti dall’1 allo 0. 

- Tasto TAB: per Colore Cornice, agire co¬ 
me con CLR HOME. 

SCELTA DELLE VARIAZIONI 

- Tasto 1: variazione TPSET 

- Tasto 2: variazione TOR 

- Tasto 3: variazione TXOR 

- Tasto 4: variazione TAND 

- Tasto 5: variazione AND 

- Tasto 6: variazione TPRESET 

- Tasto 7: variazione PRESET 

-Tasto8: variazione CIRCLE, quindi preme¬ 
re un tasto dall’1 al 6 

- Tasto 9: variazione GRAFISMO, quindi 
premere un tasto dal 2 al 5 (sono rare le va¬ 
riazioni provocate dai tasti 1,6,7) 

- Tasto 0 (zero): INGRANDISCE LO SCHER¬ 
MO (ne toglie i margini), ripremere 0 per tor¬ 
nare alla normalità (l’azione del tasto 0 
passa dal sistema normale PAL: 313 linee, 
al sistema NTSC: 262 linee e viceversa). 

SALVATAGGIO IMMAGINI 

- Tasto BS: Richiama Icona con scritta: 
“Nome file?””; digitare il nome del file (solo 
lettere o numeri) anche con estensione (es. 
“.PIC”) e premere RETURN per il suo salva¬ 
taggio su drive A 

- Tasto DEL: Per EDIT nome file: cancella 
ciò che avevate scritto 
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- Tasto ESC: Annulla l'operazione di salva¬ 
taggio e torna alle variazioni immagine 

RITORNO Al CARICAMENTO 
IMMAGINI 

- Tasto R o F5: Si torna alla scritta verde: 
"Poni il disk...." 

SALVAGUARDIA DEGLI ERRORI 
UTENTE 

Durante il caricamento o il salvataggio del¬ 
le immagini su disk, delle ON ERROR GOTO 
faranno in modo di non farvi uscire mai dal 
programma. 

A questo proposito, dei messaggi scritti o 
dei codici equivalenti vi indicheranno l'erro¬ 
re commesso. Di seguito la lista degli errori 
con i relativi codici alfabetici. 

-A: Il disco non è formattato (o formattato 
male) 

-B: Il file NON contiene un’immagine 
-C: Il file è danneggiato (o il drive non è col¬ 
legato) 

-D: Il disk è pieno (prenderne un altro) 

-E: Il disk NON è nel drive A (o è formattato 
male) 

-F: Il disk è protetto da scrittura 


-G: Disk I/O Error (vedi manuale) 

-H: Nel disk non c’è nessun file! 

-I: Internai error (il computer è danneggiato) 

Riassunto: 

Errori possibili nel SALVATAGGIO (BSAVE): 
A; D; E; F; G; I. 

Erroti possibili nel CARICAMENTO 
(BLOAD): A; B; C; E; G; H; I. 

Se manipolerete il programma IMAGO (in 
alcun modo protetto), dopo l’uscita dal pro¬ 
gramma, potrebbe apparire il messaggio: 
“Errore nr. N alla linea NL per vostra mani¬ 
polazione programma!”, dove N sarà il co¬ 
dice di ERRORE ed NL il numero di linea in 
cui esso si è verificato. 

AVVERTIMENTI 

Ricordate che il nome per il SALVATAGGIO 
dell'Immagine può avere al massimo 8 ca¬ 
ratteri, e l’eventuale ESTENSIONE (dopo il 
punto) al massimo 3. 

In alcuni rari casi le VARIAZIONI COLORE 
daranno corso ad un "blank" dello scher¬ 
mo (solo colore di sfondo), causa l’annulla¬ 
mento totale dei colori complementari mes¬ 
si a confronto. 

Appena attivato il programma con autoe¬ 
secuzione o istruzione LOAD, il programma 
stesso non è più bloccabile né con STOP né 


con CTRL-STOP, ciò per evitare seccanti 
perdite di immagini casuate da pura di¬ 
sattenzione. 

/ DISCHETTI IN VENDITA 

I dischetti da 3.5 pollici doppia faccia dop¬ 
pia densità, solo per MSX 2, richiedibili pres¬ 
so la redazione di LIST (vedi modalità nella 
pagina verde del SERVIZIO PROGRAMMI), 
sono i seguenti: 

- "IMAGO": Guida all’uso nel presente nu¬ 
mero. 

Contiene i files: autoexec.bas, titolo.pic, 
imago, gruppo.pic, nudo.pic, adriana.pic. 
Prezzo Ut. 15.000. 

- "EFFETTI SPECIALI": Guida all’uso nel 
LIST N. 1/21989 (pag. 41-43). Contiene i file: 
esl.pic, es2.pic, es3.pic, es4.pic, es5.pic, 
es6.pic, es7.pic, es8.pic, es9.pic, eslO.pic, 
special, vista. Prezzo Lit. 15.000. 

- "EFFETTI SPECIALI 2": Guida all’uso nel 
LIST N. 5 1989. 

Contiene i files: special, visione, fri.pie, fr- 
2.pic, fr3.pic, fr4.pic, fr5.pic, solare.pic, com¬ 
posi.pie. Prezzo Lit. 15.000. 

S’intende che nel prezzo del dischetto NON 
è compreso il numero arretrato di LIST (con 
la guida all’uso) che dovrà perciò essere ri¬ 
chiesto a parte. 

Ciao, e mirabili vacanze a tutti! ■ 
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NON SOLO BASIC: 

II PASCAL 


LINGUAGGI 


di STEFANO TOPARINI 


Nel corso di quest’ultimo parte del corso di 
Pascal tratteremo le più semplici strutture 
di dati, le istruzioni per ottenere dei dati in 
ingresso dal dispositivo standard di input 
ed alcune nuove strutture di controllo del 
flusso. 

Accenneremo anche a tutti quegli aspetti 
del linguaggio che non sono stati analiz¬ 
zati nello svolgimento di questo corso 


5* Parte 


Il TIPO ARRAY 


I Pascal ci fornisce una strut¬ 
tura che ci consente di mani¬ 
polare e memorizzare più 
dati dello stesso tipo con¬ 
temporaneamente in manie¬ 
ra abbastanza intuitiva: questo tipo è l’AR- 
RAY. 

Generalmente quando noi dobbiamo rife¬ 
rirci a più oggetti dello stesso tipo li indi¬ 
chiamo come il primo oggetto, il secondo e 
così via. 

In Pascal si fa la stessa cosa: consideriamo 
per esempio una estrazione di 5 numeri del 
lotto; tramite la dichiarazione 

VAR estrazione : ARRAY [1..5] OF 1..90; 

ci possiamo creare una struttura adatta per 
contenere l’estrazione che ci interessa: ma¬ 
terialmente con questa unica dichiarazione 
ci stiamo creando 5 variabili con nomi 
“ ”estazione[5] 

La forma più generale di dichiarazione di 
un ARRAY, che è quindi un insieme di varia¬ 


bili con indici, è la seguente 
ARRAY [intervallo—di—valori] OF ti¬ 

po—vai 

in cui per “intervallo—di—valori” si intende 
un intervallo di un qualsiasi tipo ordinale e 
“tipo—vai" è un qualsiasi tipo. Potremmo 
quindi definire dei tipi e delle variabili come 

TYPE 

tipo—estrazione = ARRAY[1..5] OF 1..90; 
un—array = ARRAY[‘a’..‘z’] OF BOOLEAN; 
mesi = (Gen, Feb, Mar, Apr, Mag, Giu, 

Lug, Ago, Sett, Ott, Nov, Die); 

VAR 

estrazione : tipo—estrazione; 
tabi, tab2 : un—array; 
entrate : ARRAY[mesi] OF REAL; 
entrate—2 : ARRAY[òen..Giu] OF REAL; 
index : 1..5; 

Come si può vedere si possono dichiarare 
ARRAY sia come variabili che come tipi: nel 
caso dei tipi è solo una accortezza in più 
che ci permette di rendere parametrico il 
programma. 

Le variabili che in questo modo si vengono 
a creare possono essere considerate su 
due livelli: un primo livello è quello delle sin¬ 
gole variabili componenti una variabile di ti¬ 
po ARRAY per cui valgono tutte le conside¬ 
razioni valide per variabili senza indici 

estrazione[1]: = 47; 


entrate[Gen]: = entrate—2[Gen] + 1000; 

Il secondo livello è quello di vedere l'ARRAY 
come una singola variabile per cui è possi¬ 
bile una operazione del tipo 

tabi : = tab2; 

ossia di assegnare ad un ARRAY il valore di 
un altro ARRAY ammesso che questi siano 
dello stesso tipo. 

Altre caratteristiche notevoli di queste strut¬ 
ture sono il fatto che l’indice può essere 
una variabile oppure una qualsiasi espres¬ 
sione che dia come risultato un valore del 
tipo dell’indice come in 

estrazione[index]: = 90; 
entrate[succ(Mar)]: = entrate[pred(Mar)]; 

Per concludere questo discorso possiamo 
dire che un ARRAY può avere anche più di 
una dimensione : basta, per dichiararne di 
siffatti, mettere più intervalli di valori tra le 
parentesi quadre, separati da virgole 

VAR scacchiera : ARRAY [‘A’..‘H',1..8] OF 
BOOLEAN; 

e in questo modo ci si potrà riferire ad un a 
variabile di quelle dell’ARRAY come, per 
esempio, “scacchiera[‘D’,5]”. 

Un discorso a parte merita l’ARRAY di ca¬ 
ratteri quando in esso si voglia memorizza¬ 
re ad esempio una parola o una frase o in 




Particolare del mecca¬ 
nismo della macchina 
aritmetica di Pascal 
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generale una sequenza di caratteri che 
debba poi essere mandata in output. 
Normalmente per scrivere una serie di ca¬ 
ratteri dovremmo scrivere un carattere per 
volta e ciò è abbastanza noioso: per agevo¬ 
lare il compito del programmatore si può 
definire un ARRAY particolare che può es¬ 
sere scritto con una unica istruzione di 
WRITELN. 

Questo tipo di ARRAY, che in altri linguaggi 
viene chiamato string (letteralmente fila, se¬ 
rie), viene dichiarato come 

TYPE nome—tipo = PACKED ARRAY [1..n] 
OF CHAR; 

in cui “n" è il numero massimo di caratteri 
che possono essere contenuti nella string. 
Questo modo di memorizzare caratteri offre 
l’ulteriore vantaggio di permettere di asse¬ 
gnare un valore a tutto l’ARRAY con una 
sola assegnazione come nel seguente 
esempio 

VAR nome : PACKED ARRAY[1..7] OF 
CHAR; 

(* oppure 

TYPE nomi = PACKED ARRAY[1..7] OF 
CHAR; 

VAR nome : nomi; 

*) 

nome: ='pippo 
WRITELN(nome); 


Tramite le ultime due istruzioni il program¬ 
ma prima assegna alla variabile “nome” la 
string 'pippo ’ in cui i due spazi terminali 
servono per riempire tutti gli elementi del- 
l'ARRAY e quindi scrive sullo standard out¬ 
put il contenuto della variabile: in questo 
modo è molto più semplice gestire la stam¬ 
pa di messaggi da parte del programma 
rendendo così più semplice l’interazione 
del programma con l’utilizzatore. 


Il TIPO RECORD 

Tramite il tipo ARRAY abbiamo affrontato il 
problema di gestire più variabili dello stesso 
tipo tramite indici: con il tipo RECORD pos¬ 
siamo, in maniera analoga, trattare con 
una unica variabile dati di tipo diverso. 
Facciamo un esempio per chiarire le idee: 
una semplice rubrica telefonica può essere 


vista come una serie di schede con tre dati: 
un nome, un cognome ed un numero di te¬ 
lefono ossia due sequenze di caratteri ed 
un dato che possiamo considerare REAL. 
In Pascal possiamo creare un tipo compo¬ 
sto "schede" e variabili di questo tipo in cui 
memorizzare dati composti come segue 

TYPE schede = RECORD 
nome, 

cognome : PACKED ARRAYM..10] OF 
CHAR; 

numero : REAL 
END; 

VAR schedai, scheda2 : schede; 

in cui le variabili "nome", "cognome” e 
“numero" sono dette campi del RECORD. 
A questo punto è possibile riferirsi alle va¬ 
riabili di tipo “schede” sia nel loro insieme, 
come RECORD, sia come singoli campi 

schedai : = scheda2; 

schedai.nome: = ‘Stefano ’; 
scheda2.numero: = 113; 

Il riferimento ai singoli campi del RECORD 
viene fatto, come si vede negli esempi, ag¬ 
giungendo al nome della variabile un punto 
(".”) e quindi il nome del campo al quale si 
vuole accedere, nel caso specifico il campo 
"nome” ed il campo "numero". 

Si potrebbe addirittura immagazzinare tut¬ 
ta una rubrica telefonica in una unica va¬ 
riabile del tipo 

VAR rubrica : ARRAY[1..20] OF schede; 

ed immettere poi il primo numero della ru¬ 
brica 

rubricali].nome := 'Paolino ’; 
rubricati].cognome := ‘Paperino ’; 
rubricati].numero := 313; 

Esiste ovviamente la possibilità di memoriz¬ 
zare permanentemente i dati organizzati in 
RECORD su memoria di massa (dischi, na¬ 
stri, etc.) tramite una struttura detta FILE, 
ma, poiché queste operazioni sono stretta- 
mente dipendenti da sistema operativo e 
hardware utilizzati, di questo argomento 
non parleremo. 

Per costruire un RECORD basta quindi, 
prendendo come base la dichiarazione del 
tipo “schede", cambiare il nome del tipo e 
sostituire ai campi presenti degli altri campi 


a nostra scelta secondo le necessità, que¬ 
sto senza alcun vincolo sul numero o sui ti¬ 
pi dei campi, seguendo le modalità che si 
utilizzano normalmente quando si dichia¬ 
rano nuove variabili. 

L'INPUT DI DATI 

Fino ad ora ci siamo occupati di come i dati 
vengono memorizzati, manipolati e manda¬ 
ti in uscita: nella maggior parte delle appli¬ 
cazioni reali il nostro programma ha però 
bisogno di dati in ingresso. 

Questi dati in ingresso possono venir im¬ 
messi nel programma tramite la coppia di 
istruzioni READ e READLN. 

Queste due istruzioni accettano come pa¬ 
rametro uno o più nomi di variabile: il com¬ 
puter, quando nel corso dell’esecuzione di 
un programma viene incontrata una di 
queste due istruzioni, si mette in attesa dei 
valori da inserire nelle variabili passate co¬ 
me parametri alle istruzioni, valori che gli 
provengono da un dispositivo di input (ge¬ 
neralmente nei personal computer è la ta¬ 
stiera). 

I dati, non appena sono disponibili, vengo¬ 
no memorizzati ordinatamente: il primo va¬ 
lore nella prima variabile, il secondo nella 
seconda e così via. 

Ammettiamo di avere un input di due linee e 
precisamente 

1 A 
B 

e le due istruzioni 

READ(k); 

READ(car); 

con “k” variabile INTEGER (oppure REAL) 
e "car" di tipo CHAR. Le due istruzioni 
READ non fanno altro che memorizzare 
nelle due variabili rispettivamente il valore 
uno ed il carattere ‘A’: tutto va come se 
avessimo incontrato delle istruzioni del tipo 

k: = 1 ; 
car: = 'A’; 

La istruzione READLN differisce lievemente: 
se noi avessimo lo stesso input di cui sopra 
con le istruzioni 

READLN(k); 

READLN(car); 

nelle variabili sarebbero inseriti rispettiva¬ 
mente i valori uno e B’ e questo perché que- 
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sta istruzione legge un valore in input e tra¬ 
lascia il resto della riga (in questo caso la A 
nella prima linea) saltando direttamente al¬ 
la linea successiva. 

In realtà con una unica istruzione di lettura 
si può leggere più di un valore. Per esempio 

READ(k.car); 

oppure 

READLN(k.car); 

sono equivalenti alle due istruzioni READ 
viste in precedenza (nel secondo caso la 
READLN legge i valori per “k” e “car” e so¬ 
lo poi salta alla riga successiva). 

Queste istruzioni bastano da sole per scri¬ 
vere la maggior parte dei programmi. 


ALTRE STRUTTURE 
DI CONTROLLO IN PASCAL 

Tramite l’istruzione IF, possiamo far si che il 
nostro programma esegua delle istruzioni 
diverse a seconda del verificarsi o meno di 
certe condizioni oppure esegua più volte 
gruppi di istruzioni con l'istruzione FOR. 

Il Pascal fornisce tuttavia altre strutture di 
controllo che risultano più comode, in de¬ 
terminate situazioni, di queste e che sono la 
WHILE..DO e la CASE: esiste anche un’altra 
istruzione, la REPEAT..UNTIL, che però è ri¬ 
conducibile ad altre istruzioni e che quindi 
non vedremo. 

L'ISTRUZIONE WHILE..DO 

Questa prima istruzione analoga alla FOR 
ha una struttura del tipo 

WHILE «espressione—boolean> DO «azioni* 

(in inglese while significa mentre, do fare, 
eseguire). 

La “espressione—boolean" che compare 
nella istruzione può essere o una variabile 
BOOLEAN oppure una qualsiasi operazio¬ 
ne che dia come risultato un valore di que¬ 
sto tipo, come per esempio un confronto, 
mentre “«azioni*” rappresenta una istruzio¬ 
ne o un blocco di istruzioni. 

Per capire il funzionamento della WHILE 
immaginiamo di dover sommare dei numeri 
in input (infiniti numeri uno per riga) tutti 
minori di 10 ad una variabile INTEGER ter¬ 
minando la lettura prima di avere un errore 
di overflow. 


Questo in Pascal si realizza come segue: 
somma: = 0; 

WHILE (somma+ 10)«MAXINT DO 
BEGIN READLN(num); 
somma: = somma + num 
END; 

WRITELN(somma); 

in cui "somma" e "num” sono due variabili 
intere. 

Questo frammento di programma opererà 
alla seguente maniera: dopo aver inizializ- 
zato “somma” a zero andrà a controllare la 
condizione che segue la WHILE e se questa 
risulterà vera passerà ad eseguire le istru¬ 
zioni del blocco che segue il DO. 

Se la condizione invece non sarà verificata 
l’esecuzione del programma salterà diretta- 
mente alla istruzione successiva a quelle 
precedute dal DO, e stamperà il valore di 
"somma”. 

Dopo aver eseguito le istruzioni del blocco 
verrà controllata di nuovo la condizione di 
loop e si procederà come visto sopra se¬ 
conda del valore della condizione. 


L'ISTRUZIONE CASE 

Con la istruzione IF siamo stati in grado di 
poter scegliere, in base ad una condizione, 
tra due alternative di esecuzione per un 
programma: spesso è pero necessario po¬ 
ter discriminare tra più di due alternative 
cosa che in Pascal richiederebbe l'utilizzo 
di più istruzioni IF nidificate, ossia una den¬ 
tro l’altra, abbastanza scomode da usare. 
L’istruzione CASE ci semplifica questa ope¬ 
razione nel caso in cui i percorsi da seguire 
dipendano tutti dal valore di una singola 
variabile: vediamo come in un esempio. 
Immaginiamo di avere una variabile "k” IN- 
TEGER: vogliamo scrivere un frammento di 
programma che ci stampi un messaggio 
solo se il valore di “k” è uno, due oppure tre 
dicendoci quale sia questo valore. 

Il frammento sarà più o meno 

CASE k OF 

1 : WRITELN('Uno’); 

2 : WRITELN('Due’); 

3 : WRITELN(Tre’) 

END; 

Se al posto della CASE avessimo usato de¬ 
gli IF avremmo dovuto scrivere 

IF k=1 THEN WRITELN('Uno’) 

ELSE IF k = 2 THEN WRITELN('Due’) 


ELSE IF k = 3 THEN WRITELN('Tre’); 

Si può facilmente vedere come il primo 
frammento sia molto più chiaro e di facile 
interpretazione rispetto al secondo. 

La forma più generale dell’istruzione CASE 
è comunque 

CASE selettore OF 
primo—valore : «azioni*; 

ultimo—valore : «azioni* 

END 

in cui "primo—valore”, “ultimo—valore" 
ed gli altri valori messi al posto dei puntini 
rappresentano valori validi per la variabile 
“selettore” ed “«azioni*” equivale ad una 
istruzione o ad un blocco di istruzioni. 


CONCLUSIONI 

Siamo così giunti alla fine di questo breve 
ed introduttivo corso sull'uso del linguag¬ 
gio Pascal: abbiamo però mostrato solo al¬ 
cune delle possibilità offerte da questo lin¬ 
guaggio. 

Abbiamo trascurato in questa trattazione 
tutti quegli argomenti che non possono es¬ 
sere spiegati nello spazio di tre pagine: tra 
questi, come già annunciato, l'utilizzo del ti¬ 
po puntatore, alcune strutture di dati come 
il FILE ed il SET, tutte le variazioni possibili 
per le istruzioni di input/output, le nozioni di 
procedura e funzione con tutte le implica¬ 
zioni che ne conseguono, prima fra tutte la 
ricorsione che è un punto di forza di questo 
linguaggio. 

Tutte queste sono caratteristiche generali 
del Pascal in quanto sarebbe materialmen¬ 
te impossibile entrare nel dettaglio di tutte 
le estensioni, dalla grafica al calcolo mate¬ 
matico, che si trovano in molte implementa¬ 
zioni. 

Penso che comunque siano venuti alla luce 
molti aspetti interessanti di questo linguag¬ 
gio che possano spingere (spero) qualcu¬ 
no ad utilizzare il Pascal come linguaggio 
di programmazione per il proprio hobby o 
per il proprio lavoro. 

Per chi volesse approfondire le proprie co¬ 
noscenze su questo linguaggio segnalo 
due libri 

“Introduzione al Pascal” - Welsh & Elder 
“Pascal user manual and report” - Jensen 
& Wirth che rappresentano dei classici per 
questo linguaggio. 

Per concludere buon divertimento a tutti 
con il Pascal. ■ 
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VIAGGIO 

Nili 'Amigados 


DI ANDREA MINUTEUO 


File Wm Special 

' 1 ANALISI FINANZIARIA PROGETTO ROMA - 

2 AMO FISCALE 1M( 

3 (Lire) 

4 Prino Secondo 

5 Trimestre Trimestre 


C:MICROSOFT NWIHDOVS 
PIF TERMINAI 

CAIC.EXE VIN.COM 

CAIETCAR.EXE «RITE.E) 
CARDFILE.EXE 

CU PBR0.EXE 

CLOCK. EXE 

CONTROL.EXE 

IIS00S.EXE 


7 Fatturato iHiIjlfcigjpbt. 006.008 

8 Costo del venduto 1(00)0103,000,000 

10 UTILE LORDO 56,000.000 57.080.000 ; 

11 

12 Spese operative 

13 Awimstrazione 23.008.000 7,000.000 

14 Primozione 12.000 080 15,000,066 

mmm 

PA1HT.EXE I. 
REIIERSI.EXE H 
5P00LER.EXE 

-2 ' 

23 Flusso di cassa previsto (5.000.090) 7.000.000 

30 Tasso di redditività 21,07 21,7 ; 

31 Tasso pond. di redditività 0,18 0,185 ^ 


. 


L’Amiga non è dotato solamente del 
Workbench come interfaccia verso l'utente 
ma dispone anche della CU, l'interfaccia a 
linee di comando che consente una discre¬ 
ta manipolazione sia dei nostri dati che 
del computer. Saper utilizzare questa in¬ 
terfaccia significa anche saper sfruttare 
meglio l'Amiga. In questa prima parte 
verrò introdotto il DOS dell'Amiga, descri¬ 
vendo i comandi DIR e COPY. Tutte le de¬ 
scrizioni conterranno anche le nuove op¬ 
zioni delle versione 1.3 del Sistema Ope¬ 
rativo 


Prima parte 


ominiciamo con il ricordare 
che il DOS (Disk Operating 
System) è quella parte del si¬ 
stema operativo che si inca¬ 
rica di gestire le operazioni di 
rchiviazione e successiva rilettura dei dati. 
Queste operazioni coinvolgono delle unità 
periferiche di memorizzazione che utilizza¬ 
no appunto, come supporto magnetico, i 
dischi. Il DOS, per poter dialogare con l’u¬ 
tente, dispone di svariati comandi che as¬ 
solvono alle funzioni più disparate. 

Questi comandi vengono impartiti dal¬ 
l’utente stesso per mezzo della tastiera. L’A¬ 
miga dispone di una finestra OLI (Com- 
mand Line Interface) che ha il compito di 
leggere ed eseguire i comandi che le ven¬ 
gono impartiti. 

NeH’AmigaDOS i comandi sono in realtà dei 
programmi, che vengono caricati dal disco 
ed eseguiti ogniqualvolta noi digitiamo il lo¬ 
ro nome nella finestra OLI. Per esempio se 
avessimo un comando MIO che ci fornisse 
la versione attuale del DOS, per eseguirlo 
occorrerebbe digitare MIO seguito dal tasto 
RETURN. Il DOS provvederà a caricare que¬ 
sto comando dal disco ed a eseguirlo. Nel 
caso in cui digitassimo erroneamente il co¬ 
mando, o che il comando stesso non esi¬ 
stesse, il DOS provvederà a segnalarci l’er¬ 
rore. I file vengono strutturati secondo una 
gerarchia detta “ad albero” formata da 
singoli file e da directory. All'Interno di que¬ 
ste directory possono essere presenti sia fi¬ 
le che altre directory, che vengono chiama¬ 
te sotto-directory o sub-directory. Ogni sot¬ 
to-directory appartiene ad un proprio “livel¬ 
lo" ed ogni successiva sotto-directory ha 
un livello sempre crescente. Ad esempio se 
avessimo una directory chiamata “DI” al¬ 
l’interno della quale è presente un’altra di¬ 
rectory “D2” che a sua volta contiene una 


directory "D3”, D3 è al livello due mentre D2 
è al primo livello. La directory principale si 
trova al livello zero. L’unico limite alla cre¬ 
scita di questo albero delle directory è lo 
spazio libero sul disco. I drive vengono 
identificati dalla sigla “dfN:” dove per N si 
intende un numero da 0 a 3. Il dfO: è il drive 
interno mentre i drive da df 1 : a df3: sono 
tutti i drive esterni gestibili. 


Una delle tante possibilità che il DOS ci of¬ 
fre è quella di vedere cosa è contenuto in 
un dischetto, di vedere cioè la "directory" 
del disco. Il comando che svolge questa 
funzione di visualizzazione è DIR. Con esso 
è possibile esaminare tutti i file che sono con¬ 
tenuti sul disco. Per utilizzarlo basta digitare: 


dove drive sarà uno qualunque dei drive 
dell’Amiga. Se non si specifica nessun dri¬ 
ve, il DOS assumerà che voi vogliate vedere 
il contenuto del disco presente nel drive in¬ 
terno (dfO:), ma vedremo poi come sarà 
possibile cambiare questo stato di cose. La 
visualizzazione dei nomi avviene in ordine 
alfabetico e ciò contribuisce ad aumentare 
il tempo d’attesa tra la digitazione del co¬ 
mando e l’effettiva visualizzazione del con¬ 
tenuto del dischetto. Normalmente DIR vi¬ 
sualizza i nomi delle directory e dei file che 
sono presenti nella directory principale 
(ROOT) del disco, senza però visualizzare i 
file contenuti all’interno di eventuali sot¬ 
to-directory. I nomi di file che sono seguiti 
da “(dir)” sono delle directory. Con 

DIR <drive> OPT <opzione> 

è possibile dare al posto di <opzione> dei co¬ 
mandi che sono: 



/ COMANDI DIR E COPY 


DIR «drive» 
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A : permette di vedere tutti i file che sono 
contenuti nel disco, anche quelli presenti in 
eventuali sotto-directory. 

D : permette la visualizzazione dei soli nomi 
di file che rappresentano delle directory. 
La versione 1.3 del DOS ha aggiunto un 
nuovo comando: 

C : con questo potremo dare un ulteriore 
comando DOS mentre stiamo visualizzan¬ 
do una directory. Ad esempio: 

DIR dfO: OPT i 

ci fornirà, come al solito il primo nome del fi¬ 
le ed attenderà un nostro comando. A que¬ 
sto punto digitiamo C e premiamo RETURN. 
Il DOS risponderà con: 

Command ? 

ora diamo un nuovo DIR e vedremo scorre¬ 
re la directory del nostro disco, dopodiché il 
DOS visualizzerà il successivo file o directo¬ 
ry e si porrà in attesa di un ulteriore coman¬ 
do. 

I : è una opzione molto potente che consen¬ 
te una visualizzazione interattiva della di¬ 
rectory. Infatti digitando: 

DIR dfO: OPT i 

il DOS visualizzerà il primo nome di file o di 
directory presente nel drive interno, indica¬ 
to con “dfO:’\ seguito da “?" che indica l’at¬ 
tesa da parte del DOS di un nostro coman¬ 
do. Dando un “?” otterremo la lista dei co¬ 
mandi a nostra disposizione. Avremo quin¬ 
di: 

E: serve per “entrare” in una sotto-directory 
Q: per uscire dal comando DIR 
DEL (i tre caratteri D E L e non il tasto DEL): 
per cancellare un file. Non è possibile can¬ 
cellare una directory a meno che non sia 
vuota 

T: con questo comando potremo visualiz¬ 
zare sullo schermo il contenuto del file, sia 
esso un testo od il codice di un programma. 
Per interrompere la visualizzazione basta 
premere il tasto CONTROL seguito da C. In 
seguito indicheremo con CTRL-C tale se¬ 
quenza di tasti. Con il tasto RETURN potre¬ 
mo continuare la visualizzazione dei file 
B: se stiamo visualizzando i file di una sot¬ 
to-directory, ci permette di risalire di un li¬ 
vello nell’albero delle directory. 

Sempre nella versione 1.3 sono stati intro¬ 
dotti dei sinonimi per le opzioni viste prima: 

DIR files 


visualizza solo i nomi di file 
DIR dirs 

visualizza solo i nomi delle directory 
DIR inter 

è il sinonimo di “OPT i”. 

Un altro comando che viene usato molto 
spesso è COPY. Esso permette (come si 
può intuire dal nome) di copiare file od inte¬ 
re directory da un disco all’altro od anche 
sullo stesso disco. 

La sua sintassi è: 

COPY [from] <nome—sorg> [to] <no- 
me—dest> [all] [quiet] 

Le parole racchiuse tra parentesi quadre 
sono opzionali. 

Con <nome—sorg> e <nome—dest> si indica 
sia il nome del file che si intende copiare, 
sia tutte le directory in cui è necessario pas¬ 
sare per trovare il file. Bisogna fare però at¬ 
tenzione al fatto che l’AmigaDOS non con¬ 
trolla se un file esite già e quindi se noi for¬ 
niamo come nome del file di destinazione 
un nome che già esiste sul disco, il vecchio 
file sarà cancellato ed al suo posto verrà 
memorizzato il nuovo. 

Con ALL è possibile copiare intere directory 
che altrimenti si sarebbero dovute copiare 
file per file. Se aH’interno sono presenti altre 
sotto-directory, esse verranno create auto¬ 
maticamente. Durante la copia verranno vi¬ 
sualizzati i file che man mano vengono co¬ 
piati. Per evitare ciò basta aggiungere 
“quiet" al comando COPY per evitare la 
suddetta stampa. 

Se per copiare una directory su di un altro 
disco forniamo anche un nome di file, verrà 
creata una directory con quel nome e con¬ 
terrà tutti i file della directory che volevamo 
copiare. Se si possiede un solo drive, la co¬ 
pia di un file da un disco all’altro può pre¬ 
sentare qualche problema. In questo caso 
non potremo utilizzare “dfO:" come indica¬ 
tore del drive in quanto il DOS cercherà di 
copiare il file sullo stesso disco. In questo 
caso occorre utilizzare il nome del disco. 
Infatti, ad ogni disco che formattiamo viene 
attribuito un nome (per intenderci quello 
che viene visualizzato sotto l'icona del di¬ 
sco sullo schermo del Workbench), che di¬ 
versifica un disco dall’altro. Così se volessi¬ 
mo copiare un file DATI da un disco chia¬ 
mato PIPPO ad un disco chiamato PLUTO 
dovremmo digitare: 


COPY pippo:dati pluto: 

notate i due punti (:) dopo il nome del file, 
essi indicano che quel nome rappresenta 
un disco. Notare anche che non è stato 
specificato il nome con cui memorizzare il 
file DATI, così facendo il DOS ricopierà que¬ 
sto file sul disco PLUTO con lo stesso nome 
che aveva sul disco PIPPO. Volendogli 
cambiare nome dovremmo specificarlo do¬ 
po il nome del disco di destinazione così: 

COPY pippo:dati pluto:numeri 

Ora abbiamo una copia del file DATI su 
PLUTO col nome NUMERI. 

Con la versione 1.3 del DOS, sono state ag¬ 
giunte nuove opzioni che rendono COPY 
ancora più flessibile. Eccone un elenco: 

DATES: consente di copiare anche la data 
di creazione del file sorgente. Diversamente 
la data sarà quella in cui abbiamo copiato 
e quindi creato il file 

NOPRO: tutti i file e le directory hanno asso¬ 
ciati dei bit che rappresentano, come ve¬ 
dremo più avanti, degli stati particolari per 
quel file o per quella directory. Questa op¬ 
zione evita che i bit che abbiamo settato 
siano riportati sulla copia del nostro file 

COM: avete mai provato a chiamare l’op¬ 
zione INFO dal menu Workbench dopo 
aver selezionato un file? Richiamando que¬ 
sta opzione si ha la possibilità di allegare 
un commento al file, possibilità offerta an¬ 
che dal DOS anche se in un modo meno 
"amichevole". Questa opzione permette di 
copiare oltre al file anche il suo commento 
che viceversa andrebbe perso nella copia 

CLONE: volete che il file copiato mantenga 
tutte le caratteristiche del file originario 
man non volete digitare tutti i comandi ne¬ 
cessari? Niente di più semplice. Digitando 
CLONE copierete assieme al file anche i 
suoi bit di stato ed il suo eventuale com¬ 
mento. 

CONCLUSIONI 

In questa prima puntata abbiamo presen¬ 
tato il DOS in generale e la struttura dei di¬ 
schi sotto AmigaDOS. Abbiamo anche visto 
due dei comandi DOS che generalmente 
vengono più usati. Nella prossima puntata, 
oltre a vedere altri nuovi ed utili comandi, 
daremo anche qualche informazione su co¬ 
me l’AmigaDOS gestisce i nomi dei file. ■ 


LIST 6/89 


49 



VETRINA SOFTWARE 



di GIAN PIERO ROSI 

SOFTWARE NEWS 


GRAND PRIX CIRCUIT 


Programma 

Computer 

Autore 

Distributore 


Grand Prix Circuit 
C64 

Frank Barchard e Kevin 
Pickell 

C.T.O., Via Piemonte 7/F 
40096 

Zola Predosa (BO) 



Sebbene la grafica, i colori, la ricercatezza 
dei particolari di questo gioco siano ecce¬ 
zionali, non sono queste le caratteristiche 
che più vi colpiranno, ma /’incredibile rea¬ 
lismo di simulazione 


La sensazione che proverete sarà proprio 
quella di stare al volante di una velocissima 
automobile da corsa. 

Avevamo già assaporato brividi di questo 
tipo giocando con altri simulatori di guida 
della stessa casa, ma ancora una volta 
questa Software House è riuscita a stupirci! 
Sono possibili tre tipi di gioco: Practice, per 
stabilire con quale tipo di automobile otte¬ 
nete la migliore prestazione: Single Race, 
per disputare una corsa su uno degli otto 



circuiti a vostra disposizione, con tanto di 
giro di qualificazione per stabilire la vostra 
posizione di partenza rispetto agli altri nove 
concorrenti: Championship Circuit, per 
concorrere su tutti gli otto circuiti interna¬ 
zionali e determinare in base al punteggio 
accumulato, quale posto vi spetta nella 
classifica dei Campioni del Mondo. 

Potrete scegliere tra i circuiti di Rio de Ja¬ 
neiro. Monaco. Montreal. Detroit. Silversto- 



ne, Hockenheim, Monza e Suzuka mentre le 
automobili a vostra disposizione apparten¬ 
gono alle “scuderie" Ferrari, Williams e 
McLaren. 

Per i patiti della meccanica, ogni modello è 
accompagnato da una schermata di pre¬ 
sentazione che contiene, oltre ad un ottimo 
disegno deH’automobile, anche tutte le 
principali caratteristiche tecniche. 

La ricchezza di particolari del gioco rende 
possibile la presenza di ben due specchietti 
retrovisori, che permettono di controllare 
eventuali sorpassi da parte degli altri con¬ 
correnti. 

Un riconoscimento particolare spetta al jin- 
gle che vi accompagnerà durante le pause 
di gioco, realizzato da Kris Hatielid: ottima 
la musica, ottenuta grazie ad una digitaliz¬ 
zazione elettronica. 


ACTION SERVICE 


Programma 

Computer 

Autore 

Distributore 


Action Service 
Amiga 

Infogrames^ 

C.T.O., Via Piemonte 7/F 
40096 

Zola Predosa (BO) 


Potrebbe sembrare Pennesimo e scontato 
gioco ispirato all'esercito ma vi riserverà, 


invece, molte sorprese... 



Ecco una nuova Scuola di Commandos, 
dove la parola d’ordine è "coraggio, pron¬ 
tezza di riflessi e nervi d’acciaio”. 

Se conoscete altre simulazioni di questo ti¬ 
po, saprete che si tratta di guidare un per¬ 
sonaggio sul terreno di guerra, evitando 
ogni tipo di ostacolo che si può presentare 
davanti: nemici, trappole, mine, filo spinato, 
muri di recinzione e cosi via. 

Il protagonista può correre, tuffarsi, cammi¬ 
nare carponi, saltare, aggrapparsi, scaval¬ 
care, lanciare bombe a mano, posizionare 
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esplosivi in terra, ecc. 

Inutile dire che, visto il gran numero di movi¬ 
menti differenti possibili, acquisire una cer¬ 
ta padronanza del gioco vi costerà dure ore 
di allenamento. 

Questo videogame presenta due novità 
fondamentali: il CONSTRUCTION SET e il 
modo REPLAY. 

La prima consiste nella possibilità di co¬ 
struirsi da soli, mettendo a frutto la vostra 
fantasia, gli scenari su cui vi muoverete du¬ 
rante le azioni di guerra. 



Si può scegliere lo sfondo dall’insieme for¬ 
nito, sistemare gli oggetti sulla scena, posi¬ 
zionare le trappole (ce ne sono per tutti i 
gusti!) e salvare il tutto su disco, per poi ri¬ 
chiamarlo ed, eventualmente, modificarlo. 
La seconda consiste in un videoregistrato¬ 
re elettronico, incorporato nel gioco stesso. 
Praticamente è possibile rivedere l’azione 
che avete eseguito, usando i comandi di un 
vero e proprio videoregistratore: avvolgi¬ 
mento veloce, ricerca rapida, play e arresto 
deirimmagine. Con questo meccanismo 
sarete in grado di rivedere anche l’effetto 
prodotto dai vostri scenari e verificarne 
quindi l’impatto ludico. 


688 ATTACK SUB 

Programma : 688 Attack Sub 

Computer : IBM PC 
Autore : John W. Ratcliff 


Distributore : C.T.O., Via Piemonte 

7/F 40096 
Zola Predosa (BO) 


Si tratta sicuramente di un evento nel 
mondo dei videogames: una simulazione 
incredibilmente realistica , dalla grafica 
superba e sicuramente adatto ai ... palati 
più difficili. Si può giocare persino via 
MODEM! 



688 Attack Sub è in grado di soddisfare le 
aspettative più esigenti in quanto a colori, 
realismo di azione e grafica tridimensiona¬ 
le. Inoltre vi dà la possibilità di giocare con¬ 
tro un avversario “umano” all’altro capo di 
un telefono, quindi anche in un’altra città: 
infatti il 688 Attack Sub prevede l’interfac¬ 
ciamento con un MODEM, aprendo la stra¬ 
da al videogame telematico! 

Siete a bordo di un grande sottomarino 
americano in veste (attenzione, attenzio¬ 
ne...) di capitano. Si tratta del famoso som¬ 
mergibile atomico da attacco “Los Ange¬ 
les", del valore di un miliardo di dollari. Se 
preferite potete comandare invece il som¬ 
mergibile sovietico classe ALFA. 

Tutti i principali sistemi di difesa e controllo 
sono a vostra disposizione: sonar, missili, 
radio di bordo, timone di rotta, periscopio. Il 
tutto regolato da più di 40 controlli separati 



che vi lasciano capire quanto sia comples¬ 
so operare con il mondo della più sofistica¬ 
ta tecnologia di difesa. 

Il gioco parte, ovviamente, dalla sala di co¬ 
mando dove si trovano il periscopio, i pan¬ 
nelli di controllo e le porte di accesso alla 
sala radio e alla sala sonar. 

Il disco non è protetto fisicamente, ma utiliz¬ 
za uno stratagemma oseremmo dire “enig¬ 
mistico”: il programma fornisce una frase 
che dovrete ricercare nel manuale (70 pagi¬ 
ne!) per poi digitare sulla tastiera le prime 
tre lettere della parola seguente. 

Questa sarà la chiave per entrare nel mon¬ 
do estremamente affascinante del 688 do¬ 
ve, una volta tanto, il programmatore ha vo¬ 
luto dare ai nemici e ai compagni di avven¬ 
tura un volto veramente umano, grazie al¬ 
l’uso di foto digitalizzate. 

Non solo: la simulazione è talmente realisti¬ 
ca da darvi l’impressione che il nemico stia 
veramente ragionando e che senta ogni vo¬ 



stro piccolo movimento. 

E non è impossibile (come gli autori del gio¬ 
co auspicano nella copertina di presenta¬ 
zione) che nel bel mezzo della battaglia vi 
fermiate un istante per domandarvi: tutto 
questo sta succedendo realmente? 
uoi sempre aspettare che esca sul mercato 
il nuovo MSX 3, che dovrebbe possedere 
più di 1000 colori ! 
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di GIANNI AGAMENNONE 

La tecnica di visualizzazione delle imma¬ 
gini adottata per i PC deriva da quella te¬ 
levisiva, vediamo come è stato risolto in 
TV il problema dello sfarfallio (Plicker) e 
come lo si può ovviare sui video dei per¬ 
sonal. 


n’immagine video è costitui¬ 
ta da un insieme di righe 
esplorate da un sottile fa¬ 
scio di elettroni chiamato 
"beam”, se questo non viene 
sottoposto ad alcun controllo è possibile 
osservare un punto luminoso (SPOT) rima¬ 


nere fisso sullo schermo. Un dispositivo 
elettronico, "VIDEO CONTROLLER”, gover¬ 
nerà il fascio elettronico per visualizzare 
ogni informazione contenuta nella memo¬ 
ria video del computer. 

Questo controllore video effettua anche al¬ 
tre operazioni, infatti serializza le informa¬ 
zioni (mette i bit "uno dietro l’altro") per in¬ 
serirli nelle le righe video, produce i “sincro¬ 
nismi orizzontale e verticale" e tante altre 
operazioni prima di produrre il segnale vi¬ 
deo. 

Affinché una serie di immagini dia una sen¬ 
sazione di movimento degli "oggetti” in es¬ 
sa contenuti, occorre che le immagini video 
si susseguano in un tempo "rapido” o con 
una frequenza di quadro adeguata. Questa 
frequenza di ripetizione dei “trame" è gene¬ 
rata dal solito controllore video contenuto 
all'interno di qualsiasi computer. 

La tecnica di visualizzazione delle immagini 
adottata dai personal computer deriva da 


quella televisiva, pertanto è necessario co¬ 
noscere i fondamenti di quest’ultima. 

LO STANDARD TELEVISIVO 

Per visualizzare (display) un’immagine otti¬ 
ca con un CRT è necessario definire le ca¬ 
ratteristiche geometriche dello schermo. 
Uno schermo televisivo è, per convenzione 
internazionale, di forma rettangolare ed il 
rapporto base/altezza è pari a 4/3. Si può 
scrivere l’eguaglianza: B/H = 4/3 e questa 
proporzione permette di individuare le di¬ 
mensioni di H e di B, disponendo soltanto 
della dimensione della diagonale D espres¬ 
sa in pollici possiamo scrivere: D2 = B2 + 
H2 e da questa formula otteniamo: 
B = 0,8*D ed H = 0,6*D; ora potrete cono¬ 
scere le dimensioni di H e B. 

Il numero di righe concorre a determinare la 
“qualità” dell'Immagine riprodotta sullo 
schermo, infatti un numero elevato di righe 
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determina un’immagine nitida o più defini¬ 
ta; quindi il numero di righe determina la RI¬ 
SOLUZIONE VERTICALE. 

Il numero di "elementi di immagine”, indivi¬ 
dualmente controllabili, su una riga defini¬ 
sce la RISOLUZIONE ORIZZONTALE. 

N.B. nei testi relativi ai computer spesso vie¬ 
ne indicata la risoluzione grafica, ad esem¬ 
pio: 640*320 punti o pixel. 

Questa definizione deve essere intesa: la 
RISOLUZIONE DI QUADRO é di 640 [pixel 
per riga attiva] per 320 [righe]. 

Il termine “riga attiva” sarà spiegato in se¬ 
guito. 

Lo standard televisivo italiano ha quantifi¬ 
cato in 625 righe orizzontali (quello ameri¬ 
cano in 525) che costituiscono un quadro. 
Per avere un RISOLUZIONE ORIZZONTALE 
eguale a quella VERTICALE, su una riga 
dobbiamo avere un numero di elementi 
d’immagine pari a 4/3 625 = 830, cioè au¬ 
mentato di 4/3 per tener conto della mag¬ 
giore larghezza della base prevista dallo 
standard. Ciò costituisce un esempio, gli 
standard relativi ai computer prevedono ri¬ 
soluzioni molto differenziate. 

Il quadro televisivo risulta così suddiviso in 
un “reticolo" i cui "elementi" sono i famosi 
PIXEL che formano l’immagine. Il numero 
complessivo in un’immagine ammonta a 
4/3 625 625 = 520.833 pixel dove il simbolo 
“ = " informa che i valori prodotti non ten¬ 
gono conto di "altre considerazioni” di ca¬ 
rattere tecnico. 

Una di queste deriva dal fatto che non tutta 
riga porta informazione video e non tutte le 
righe sono utilizzate per visualizzare i pixel 
ovvero “attive"! Ciò perché le parti non atti¬ 
ve devono portare altre informazioni di 
controllo del fascio elettronico: i sincroni¬ 
smi di riga, di quadro e segnali di servizio. 
Comunque la trattazione di questi problemi 
tecnici esula dallo scopo di questo articolo. 
Tutti i pixel, che concorrono a formare le 
immagini, “sono portati dal segnale video” 
sullo schermo ed qui “permangono" per 
un certo tempo in funzione della “persi¬ 
stenza dei fosfori". 

Un monitor con fosfori a lunga persistenza 
provoca le famose scie luminose che se¬ 
guono gli oggetti in movimento. 

Per ottenere una visione esente da flicker, 
senza usare fosfori ad alta persistenza, la 
"circuiteria elettronica" deve essere in gra¬ 
do di visualizzare 50 quadri al secondo (50 
FRAME/SEC). 

Questa tecnica comporta però una com¬ 
plessità notevole dell’hardware del ricevito¬ 
re televisivo (anche del monitor per compu¬ 
ter), ciò si traduce in costi elevati dei dispo¬ 



sitivi elettronici con cui sono realizzati. 
Infatti un segnale video “molto veloce" de¬ 
ve “transitare facilmente nel dispositivo di 
visualizzazione"; la tematica connessa agli 
amplificatori audio HI-FI. ad esempio, può 
per analogia aiutare a comprendere il con¬ 
cetto di "larga banda video” è simile a “lar¬ 
ga banda audio", caratteristica questa de¬ 
gli amplificatori ad “alta fedeltà" pertanto 
costosi. 

Uno standard a 25 frame/sec soddisfa l'esi¬ 
genza di una minore complessità hardware 
ma non l’esigenza dell’occhio umano. 
Pertanto è stata utilizzata la tecnica della 
"SCANSIONE INTERLACCIATA”, che con¬ 
siste nel riprodurre un’immagine sullo 
schermo, non con un RASTER con 625 ri¬ 
ghe successive, ma con una TRAMA com¬ 
posta da due CAMPI (FIELD) successivi nel 
tempo e ciascuno composto da 312,5 righe 
interlacciate. Questa sequenza si ripete nel 
tempo sullo stesso schermo e permette alle 
immagini che si susseguono, di contenere 
sempre 625 righe per quadro e questo vie¬ 
ne esplorato in 1/25 di secondo. 

I due campi o semiquadri, interlacciati e 
successivi che lo completano, sono ciascu¬ 
no esplorati in 1/50 di secondo. 

In altri termini possiamo dire che la FRE¬ 
QUENZA DI QUADRO è di 25 Hz e la FRE¬ 
QUENZA DI TRAMA è di 50 Hz, cioè doppia 
della prima per effetto della scansione in- 
terlacciata. Il termine Hz indica un’unità di 
misura in frequenza, cioè in Hertz ed il nu¬ 
mero che la precede ci informa di quante 
volte al secondo “accade un fenomeno”. 
Con questo artificio si è “eliminato” lo sfar¬ 
fallio (flicker), soddisfatta l’esigenza di una 
visione abbastanza dettagliata con banda 
passante video ridotta della metà! Infatti 
625 righe sono scandite in 1/25 di secondo 
e pertanto e pertanto le “righe sono esplo¬ 
rate in un secondo” 625*25 = 15.625 o in 
termini di frequenza 15.625 Hz 
Questa è appunto la “frequenza orizzonta¬ 
le di riga" con cui deve lavorare il VIDEO 
CONTROLLER per pilotare il fascio elettro¬ 


nico e pertanto se desideriamo 625 righe 
consecutive o non interlacciate, il control¬ 
lore deve raddoppiare la predetta frequen¬ 
za. 

Ma non è tutto, il povero monitor deve “es¬ 
sere capace” (banda video adeguata) di 
poter gestire tale frequenza; questa è la ra¬ 
gione per cui la Commodore non ha prefe¬ 
rito usare monitor speciali (multisync) che 
costano molti soldini! 

Ora per visualizzare 512 righe video, sul 
computer Amiga, senza usare un costoso 
monitor a "larga banda video", i progettisti 
di Amiga hanno "regolato” il CRT control¬ 
ler affinché produca due semiquadri inter¬ 
lacciati composti da 256 righe ciascuno. 
Ora dovreste protestare: il modo interlac- 
ciato è uguale a quello televisivo ed allora 
perché si osserva il flicker? 

Per effettuare un esperimento in modo che 
possiate comprendere "l'arcano"; manda¬ 
te in esecuzione un programma per dise¬ 
gnare in modo video interlacciato, riempite 
lo schermo con il colore nero, disegnate un 
rettangolo bianco come in figura e riempi¬ 
telo (FILL) dello stesso colore, misure esat¬ 
te non sono necessarie. 

Tutto ciò Vi permette di osservare “un pez¬ 
zo di fenomeno" ed analizzarlo con atten¬ 
zione e cercare di studiare le cause. 

Nel rettangolo le righe relative ai due semi¬ 
quadri sono di colore bianco, per effetto 
dell’interlacciamento esse sono "scandite" 
ad una frequenza di 50 Hz e pertanto non 
"dovremmo" osservare il flicker, calma, an¬ 
cora un momento! Viceversa, ai bordi, ad 
esempio sul lato superiore del rettangolo, 
osserviamo il flicker; infatti la prima riga 
bianca è vista ad una frequenza di 25 Hz 
perché le è vicina la iesima riga nera. 

Ora comprenderete la causa del “movi¬ 
mento verso l’alto di questa riga bianca", 
cioè la ragione della sua "instabilità" e per¬ 
tanto dello "sfarfallamento” (flickering) co¬ 
me un’ala di una farfalla che che si muove 
ciclicamente in su ed in giù! 

Nelle trasmissioni televisive invece le 
“astronavi" o altre immagini, in genere, so¬ 
no "sempre" in movimento. 

Ecco perché non avvertite il flicker; infatti 
provate a guardare un monoscopio televi¬ 
sivo (dove tutto è statico) vedrete il flicker. 
Per risolvere il problema, pertanto, dovrete 
usare un monitor che utilizza fosfori ad alta 
persistenza oppure una scheda “FLICHER- 
FIXER” della MICROWAY americana; que¬ 
sta scheda, però, è utilizzabile soltanto con 
Amiga 2000 mod.B fornito di un buon moni¬ 
tor multisync che tratteremo in un prossimo 
articolo. ■ 
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Nell’ambito delle esperienze fatte per 
l’applicazione dell’informatica nell’inse¬ 
gnamento particolare rilevanza ha avu¬ 
to, nei mesi scorsi, il progetto denomina¬ 
to SCUOLA BIT 89. Questo progetto 
vede impegnati 53 Istituti Tecnici in tutto 
il territorio nazionale, scelti dal Ministero 
della Pubblica Istruzione e coordinati 
dall’I.T.I.S. “ENRICO FERMI” di Roma. 
Televideo RAI ha collaborato con que¬ 
sto gruppo facendo da carrier del pro¬ 
getto attraverso le trasmissioni di Tele- 
software, il cui responsabile, Dott. Pier- 
silverio Pozzi, ci ha rilasciato una inte¬ 
ressante intervista nel numero 5 di LIST. 
Con le interviste pubblicate in questo 
numero, abbiamo voluto riassumere le 
esperienze fatte con le trasmissioni dati 
via etere con Televideo Rai, il Ministero 
ed il Fermi di Roma. Questa collabora¬ 
zione riprenderà ad Ottobre. 
Nell’ambito delle esperienze fate la CID 
(Cooperativa Informatica Didattica, fon¬ 
data da un gruppo di insegnanti del 
Fermi), ha prodotto un modulo didattico 
intorno al quale sono stati elaborati otto 
complementi, che vengono trasmessi da 
Telesoftware nel periodo che va dal 10 
Aprile al 3 Giugno. 

Ciascun complemento va in onda per 
una settimana. Il modulo si chiama “CA¬ 
SUALITÀ E PROBABILITÀ". Da questo 
numero la nostra rivista apre un nuovo 


spazio che sarà dedicato al progetto 
SCUOLA BIT. 

Gli obiettivi dello spazio che apriamo su 
LIST sono molti, ne indichiamo schema¬ 
ticamente, per il momento, le direttive 
principali: 

— Di informazione delle esperienze di 
software in genere e di quello didattico. 

— Di illustrazione dei moduli via via tra¬ 
smessi da Telesoftware. 

— Di possibile raccolta di altro mate¬ 
riale didattico non conosciuto e quindi 
una sua eventuale diffusione via etere. 

— Ed infine I* apertura di uno spazio di 
riflessione e di confronto. 

Vi invitiamo fin d’ora a scriverci, a dare 
suggerimenti, a chiederci tutto quello 
che volete su questa iniziativa. 

Allo scopo di diffondere meglio questa 
iniziativa, il nostro ufficio commerciale 
sta studiando la possibilità di aprire una 
campagna abbonamenti a condizioni 
molto vantaggiose per gli studenti. 

Dopo la fine di questo ciclo di trasmis¬ 
sioni, il tre giugno, il nuovo appunta¬ 
mento con SCUOLABIT sarà ad Otto¬ 
bre. Non perdetelo e, nel frattempo, non 
perdete i contatti con LIST, perché con¬ 
tinueremo a tenervi aggiornati sui pro¬ 
gressi della Rete Telematica. 


di MARINA ATZU 

Come preannunciato, eccoci ad ampliare il 
discorso sul Telesoftware ed in particolare 
sul software ad uso didattico nelle scuole. 
In questo numero: un ' intervista al preside 
dell 1 Enrico Fermi, on. prof. Epifanio Giu¬ 
di ceand rea e al professor Umberto Va iro¬ 
no, docente di matematica applicata nello 
stesso Istituto e fondatore, insieme ad altri 
docenti del Fermi, della cooperativa CID 
(Cooperativa Informatica Didattica) che ha 
sede in Roma, via Pentimalli 46 


i calcola che il fatturato 
mondiale del software, pas¬ 
serà dai 30 miliardi di dollari 
del 1984 ai 110 miliardi di 
dollari nel 1990. Negli Stati 
Uniti, i bambini di oggi vengono chiamati 
“la generazione della tastiera”. Un numero 
sempre maggiore di scienziati e di studiosi 
si dichiara favorevole al “passaggio dall’ 
insegnamento dell’ uso del computer alla 
sua introduzione in tutte le scuole ed in tut¬ 
te le materie scolastiche come strumento di 
sapere”. In America si cominciò a pensare 
seriamente ad un massiccio impiego del 
computer nelle scuole, nel 1980, quando il 
“padre" della APPLE Steve Jobs, convinse 
Pete Stark, deputato californiano e John 
Danforth, allora senatore del Missouri, a 
presentare un progetto di legge per lo sgra¬ 
vio fiscale delle ditte produttrici di compu¬ 
ter, che avessero donato una parte della lo¬ 
ro produzione alle scuole. 

Lo slogan lanciato da Jobs fu “an appiè for 
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II preside dell’E lìrico Fermi, on. prof. Epifanio Giudiceandrea, con il nostro direttore e /' intervistatrice. 


thè teacher” (una mela per il maestro), ma 
purtroppo il progetto fu bocciato a livello 
nazionale. Passò invece in California, dove 
nel 1983 le scuole locali ricevettero gratui¬ 
tamente da Jobs diecimila computer. 
Adesso le grandi multinazionali americane 
cercano i loro dirigenti fra i ragazzi prodigio 
del computer. 

L’ esempio americano fu seguito da Inghil¬ 
terra e Francia ed ora anche dall’ Italia do¬ 
ve, nel 1985 è stato approvato un Piano Na¬ 
zionale per I’ Informatica dall’allora mini¬ 
stro on. Franca Falcucci. Da allora, secon¬ 
do stime recenti condotte dall’ Ufficio Studi 
e Programmazione del Ministero della Pub¬ 
blica Istruzione, il numero dei computer nel¬ 
le scuole è arrivato a circa sedicimila unità 
nel 1987 e si preveae che alla fine del 1989 
questo numero sarà ulteriormente incre¬ 
mentato fino al 1990, anno in cui tutte le 
scuole saranno informatizzate. 

La diffusione maggiore di computer si ri¬ 
scontra nelle medie superiori, dove tra l’al¬ 
tro, un gruppo di 53 Istituti Tecnici, scelti dal 
Ministero della Pubblica Istruzione, sta spe¬ 
rimentando l'informatica come materia di 
insegnamento, utilizzando alcune unità di¬ 
dattiche elaborate dalla CID. 

Il coordinamento di questa iniziativa, è ge¬ 
stito dall' istituto Enrico Fermi di Roma. 
Dopo l’esperienza positiva della collabora¬ 
zione con Radiosoftware prima e con Tele- 
software poi, la RAI, con questo gruppo ha 
deciso di lanciare un vero e proprio proget¬ 
to, che ha chiamato SCUOLABIT 89. 

Ed è proprio di SCUOLA BIT89 che vi parlia¬ 
mo in questo numero, facendoci racconta¬ 
re la loro esperienza dal preside del Fermi e 
da uno dei suoi docenti che ha partecipato 
attivamente a questo progetto. 

INTERVISTA PRESIDE ENRICO 
FERMI ON. PROF.EPIFANIO 
GIUDICEANDREA. 

D) Lei è descritto dal personale docente e 
non docente dell’ Enrico Fermi come un 
preside progressista e aperto alle nuove 
esperienze. Il suo istituto è stato il capostipi¬ 
te nell’esperienza del Telesoftware e man¬ 
tiene questo primato per quanto riguarda il 
progetto SCUOLABIT 89. 

Qual' è la sua opinione in proposito? 

R) Voglio innanzitutto sottolineare alcuni 
aspetti importanti dal punto di vista innova¬ 
tivo, caratteristici di questo progetto. 

La sua realizzazione scuola per scuola, ri¬ 
chiede una programmazione di lavoro per 
gruppi di docenti che cooperano, sia in 


senso orizzontale per la stessa materia, sia 
in senso verticale per materie diverse. 
Questo è molto importante, perché fa avan¬ 
zare negli insegnanti una cultura nuova, di¬ 
versa da quella cui sono abituati. 

Il docente fino ad oggi ha infatti lavorato da 
solo e tende ancora a lavorare da solo, per¬ 
ché non vede l’importanza di collegarsi con 
gli altri. Un indice di questo stato di cose è il 
funzionamento dei Consigli di Classe, che 
sono spesso visti solo come riunioni di in¬ 
formazione e non come momento di aggre¬ 
gazione; né d'altronde si può affermare che 
la valutazione degli studenti sia espressio¬ 
ne del Consiglio di Classe. Essa è infatti tut¬ 
tora, quella decisa dal docente della mate¬ 
ria e il Consiglio di Classe non interviene 
mai salvo qualche volta negli scrutini finali. 
Con questo progetto invece si introducono 
una metodologia e una didattica diverse e 
questo è il primo aspetto importante e inno¬ 
vativo. 

Il secondo aspetto è che l'uso del software 
durante le normali lezioni, richiede un'orga¬ 
nizzazione diversa da quella adottata fino¬ 
ra, che analizza il problema di come rinno¬ 
vare la metodologia didattica e quindi, a 
mio parere, l’uso del software per insegnare 
non è solo un mezzo per far diventare la le¬ 
zione tradizionale più interessante. Si può 
affermare che fino ad ora, l’organizzazione 
scolastica era al servizio dei docenti e non 
viceversa, come invece dovrebbe essere. 
Con l’introduzione delle nuove tecnologie 
questo stato di cose è mutato e non è più il 
professore, ma l'intera struttura scolastica 
ad essere responsabile per quanto riguar¬ 
da la formazione degli alunni. 

Questa è senz’altro una delle note più posi¬ 
tive dovute all’introduzione dell’ informatica 
nelle scuole. 


D) Questo tipo di didattica non è ovviamen¬ 
te mirata alle sole specializzazioni di infor¬ 
matica. Siete riusciti, almeno in parte, a rea¬ 
lizzare una struttura organizzativa che 
coinvolga gli altri docenti? 

R) Sì, qualcosa abbiamo fatto; portiamo 
avanti questo progetto creando dei gruppi 
di sostegno all’interno della scuola. 

Allo stato attuale delle cose non è verosimi¬ 
le pensare che il professore di italiano ad 
esempio, riesca ad utilizzare al meglio un 
programma di software didattico, ha biso¬ 
gno di avere una assistenza tecnica, sia pri¬ 
ma di fare la lezione, che al momento di 
trarre le conclusioni. 

Noi abbiamo assicurato questa assistenza 
creando un gruppo di sostegno del quale 
fanno parte docenti di informatica e anche 
docenti di altre materie fra quelli già esperti 
di nuove tecnologie informatiche. 

A questo gruppo possono rivolgersi e lavo¬ 
rare insieme, quei docenti che sperimenta¬ 
no in classe un pacchetto di software. 

D) Fino ad ora ci ha parlato di un singolo 
istituto. Ma il progetto SCUOLABIT, così co¬ 
me è stato per Radiosoftware prima e per 
Telesoftware successivamente, interessa 
un gruppo vasto di istituti. 

Qual’ è stato il metodo di lavoro adottato 
nelle altre scuole? 

R) Più o meno il nostro. Uno degli obiettivi 
del progetto SCUOLABIT è cominciare a 
creare in ogni scuola dei gruppi di esperti, 
che possano trasmettere anche nelle altre 
scuole le loro conoscenze. 

Il gruppo di cui parlavo prima, che cura e 
assiste i docenti del Fermi che si misurano 
con questo progetto, è in collegamento, 
tramite Televideo, via telefax , telefonica- 
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mente e, negli anni precedenti anche via ra¬ 
dio, con i gruppi degli altri istituti. 

Si è costituita in pratica una rete telematica 
che fa capo a Televideo, che non è solo di 
assistenza, ma che ha funzioni di controllo 
e di verifica continua. 

L’ Enrico Fermi è a capo, dal punto di vista 
didattico, di questa rete formata dalle 53 
scuole. Un altro obiettivo del progetto è 
quello di creare nelle varie scuole, degli 
esperti di programmazione che producano 
direttamente il software. Siamo convinti che 
il software didattico non è come tutti gli altri 
software, ma che ha bisogno per vivere, per 
diffondersi, per diventare un elemento di¬ 
dattico valido, che tutti i docenti siano al¬ 
l'altezza di valutare, di cambiare, di espri¬ 
mere le proprie idee sul modo in cui sono 
stati sviluppati i vari software che sperimen¬ 
tano in classe. Questo in perfetta analogia 
con quanto avviene coi libri di testo. 

In particolare, per quanto riguarda il soft¬ 
ware, il docente dovrebbe essere messo in 
condizione di poterlo modificare, di avere 
anche il gusto, la soddisfazione di crearne 
uno nuovo. 

D) Per il progetto Telesoftware avete lavo¬ 
rato in collaborazione col Ministero della 
Pubblica Istruzione. 

Come vi ha aiutato, come si è inserito e che 
cosa si propone di fare per ampliare even¬ 
tualmente questa esperienza? 

R) Il Ministero della Pubblica Istruzione, se 
da una parte dimostra molto interesse, dal¬ 
l'altra, come è forse giusto, dimostra una 
certa prudenza. 

D) Ma il suo contributo pratico qual e sta¬ 
to? 

R) Beh, intanto sono state a suo carico le 
spese per i momenti di verifica e per gli ag¬ 
giornamenti collettivi e questo non è certo 
cosa da poco. 

Ha sostenuto anche le spese per il funzio¬ 
namento e la direzione del gruppo di esper¬ 
ti, che aveva la responsabilità didattica e 
gestionale della rete telematica. A questo 
proposito ha anche concesso il distacco a 
due insegnanti del Fermi. Mi lasci dire che 
certamente l’interesse del Ministero per 
questo esperimento è molto forte ed il suo 
impegno è notevole, soprattutto se lo si pa¬ 
ragona a quello per altre iniziative; d’altra 
parte la formazione pubblica non avrebbe 
più prospettive se non cominciasse a utiliz¬ 
zare questi mezzi offerti dalle nuove tecno¬ 
logie informatiche, quali ad esempio la co¬ 


municazione a distanza in tempo reale etc. 

D) Come è nata invece la collaborazione 
con la Rai e il Telesoftware? 

R) La necessità della collaborazione con la 
RAI nasce dal fatto che il Telesoftware è, 
non solo la portante del software, ma an¬ 
che un elemento fondamentale della pro¬ 
gettazione di tutta I’ esperienza ed in parti¬ 
colare per il funzionamento della rete. 
Quando dico rete penso allo scambio con¬ 
tinuo di opinioni, al onfronto, alla discus¬ 
sione tra i docenti dei vari istituti e quanto 
più questo avviene in tempo reale, tanto più 
è efficace. 

Per la diffusione del software è infatti ne¬ 
cessaria la partecipazione attiva del docen¬ 
te e questo è possibile, perché Televideo 
sollecita questa partecipazione. Anzi, ci au¬ 
guriamo che con l’avvento del satellite, 
questa comunicazione avvenga sempre più 
in tempo reale. Noi vediamo Televideo co¬ 
me un centro di collegamento. Ha purtrop¬ 
po il limite di non essere interattivo. 

D) Quali sono le Sue conclusioni? 

R) Non si intravedono ancora le forme defi¬ 
nitive a cui si deve arrivare, però si può con¬ 
cludere che il metodo tradizionale di fare le¬ 
zione è ormai completamente stravolto e 
superato e che le vie stanno nelle nuove 
tecnologie. 

D) Lei ritiene dunque superato il supporto 
"cartaceo’’, cioè quello dei libri e delle rivi¬ 
ste? 

R) Assolutamente no. Sarebbe un grave er¬ 
rore fare a meno dei libri di testo, anzi, la lo¬ 
ro funzione diventa più importante, perché 
di supporto ai docenti. 

Non solo, io vedo molto funzionale creare 
una rivista che porti avanti il nostro discor¬ 
so, perché, non lo ripeterò mai abbastanza, 
c’è bisogno di collegamenti e di assistenza. 

INTERVISTA PROF. UMBERTO 
VAIRANO I.T.I.S. ENRICO 
FERMI DI ROMA 

D) Professor Vairano, lei ha coordinato il 
progetto Radiosoftware e Telesoftware ed 
ora partecipa a SCUOLABIT 89. Può parlar¬ 
ci di questa sua esperienza? 

R) Nel 1988, con Radiosoftware e con Tele¬ 
video abbiamo fatto una prima esperienza 
di produzione e trasmissione di software di¬ 
dattico via etere. 

Quando dico noi mi riferisco ad un gruppo 
di insegnanti dell’Enrico Fermi, alla RAI ed 


al Ministero della Pubblica Istruzione. 

Ad un certo punto della nostra esperienza 
ci siamo resi conto che, per poter continua¬ 
re a riflettere su che cosa significa un’unità 
didattica informatizzata e soprattutto per 
continuare a produrne delle altre, era ne¬ 
cessario che il nostro lavoro ci desse, non 
dico un guadagno, ma almeno una com¬ 
pleta copertura delle spese di produzione. 
È vero infatti che la RAI comprava le unità 
didattiche, ma il pagamento non riusciva a 
coprire la quantità di lavoro che noi faceva¬ 
mo per produrle. È nata così l'idea di una 
cooperativa che ci permettesse di produrre 
unità didattiche più avanzate di quelle ela¬ 
borate negli anni precedenti, consentendo¬ 
ci di confrontarci con il mercato. Questa 
cooperativa si chiama CID ed è formata più 
o meno da tutti gli insegnanti che avevano 
lavorato con la RAI e con il Ministero. 

Ad oggi, dopo un anno di lavoro, elaboran¬ 
do le idee maturate negli anni precedenti 
con Radiosoftware e Televideo, abbiamo 
prodotto 10 nuove unità che, a mio avviso, 
sono molto avanzate dal punto di vista di¬ 
dattico, soprattutto se confrontate con 
quello che c’è sul mercato oggi. 

D) Siete coadiuvati da alunni in questo tipo 
di lavoro? 

R) No da alunni no. Abbiamo dei rapporti 
con ex alunni che retribuiamo regolarmen¬ 
te, ma in genere non amiamo mischiare la 
parte didattica, il rapporto tra insegnante e 
studente, con un rapporto di tipo societario 
tra insegnanti e studenti che attualmente 
sono ancora nell’istituto. 

D) Al di là della sperimentazione con la RAI, 
usate le unità didattiche anche per fare le¬ 
zione? 

R) Certamente, anzi posso affermare che la 
prima fonte di idee per le unità didattiche, 
nasce nelle classi proprio da precise esi¬ 
genze didattiche, tra le quali l’esigenza di 
poter utilizzare al meglio i computer, perché 
non dimentichiamo che per noi l’informati¬ 
ca è pane quotidiano e quindi nasce dalla 
nostra esperienza di insegnamento. È per¬ 
ciò evidente che esiste una ricaduta nelle 
classi, anzi diciamo pure che un’ unità di¬ 
dattica viene tarata e validata nelle classi 
prima della sua stesura definitiva. 

D) I vostri programmi sono interdisciplinari, 
cioè non trattano di un solo argomento, ma 
contengono richiami ad altre materie. In che 
modo proponete le unità didattiche nelle 
classi? Fate delle ore di lezione mista? 

Per esempio, se ci sono richiami di italiano 
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Con questo televisore, realizzato dalla Seleco S.p.A. è stata condotta tutta la sperimentazione di 
trasmissioni di software didattico. 


o di storia nell’unità che state presentando, 
è in aula anche il professore di italiano? 

R) Alcune volte si, altre no. Bisogna consi¬ 
derare però una cosa fondamentale: molti 
degli insegnanti che sperimentano unità di¬ 
dattiche si trovano nella stessa sezione. 
Nella mia sezione ad esempio, che è una 
sezione di informatica, ci sono quattro inse¬ 
gnanti di materie diverse che fanno parte 
della cooperativa. 

D) Quindi alla stesura dei programmi non 
collaborano solo insegnanti di informatica, 
ma anche professori di altre materie? 

R) Non potrebbe essere altrimenti, perché 
se è chiaro che l’insegnante di italiano non 
elabora la parte informatica vera e propria, 
è altrettanto chiaro che nella preparazione 
di una unità didattica di italiano I’ apporto 
del docente della materia è fondamentale. 

D) Ma in generale gli altri insegnanti, ad 
esempio quelli che non fanno parte della 
cooperativa e comunque gli alunni, come 
vedono questo diverso tipo di.insegnamen¬ 
to? 

R) Alcuni non ne sono proprio a conoscen¬ 
za, altri lo usano senza averlo prodotto, ma 
in generale, soprattutto nel biennio c’è una 
certa attenzione, in particolare per quanto 
riguarda le unità didattiche di matematica e 
fisica. Nel biennio infatti, con il Piano Na¬ 
zionale di Informatica, è nato un forte inte¬ 
resse verso le unità da noi prodotte, interes¬ 
se dovuto soprattutto al tipo di programmi 


innovativi che sono stati proposti. 

D) C’è qualcuno fra gli insegnanti o fra gli 
alunni che si è dichiarato nettamente sfa¬ 
vorevole a questo tipo di sperimentazione? 

R) No. Il materiale che noi abbiamo prodot¬ 
to è rivolto agli insegnanti e non vuole esse¬ 
re assolutamente materiale in auto-appren¬ 
dimento totale. Esso deve rientrare comun¬ 
que aH’interno della programmazione di¬ 
dattica del singolo docente, che ha quindi 
la facoltà di usarlo come preferisce e come 
è più conveniente al suo metodo di inse¬ 
gnamento. 

D) Che cosa vi proponete di ottenere da 
questo nuovo metodo di studio? 

R) Di migliorare la didattica è banale dirlo. 
Sicuramente di fare delle esperienze e di 
produrre del materiale didattico avanzato 
per noi e per gli altri insegnanti che volesse¬ 
ro usarlo. 

Per il momento per noi è ancora una ricer¬ 
ca; ancora oggi, stiamo riflettendo su quale 
debba essere il rapporto fra insegnamento 
tradizionale e insegnamento con l’uso di 
calcolatori, né per quali materie è più speci¬ 
fico l’uso di unità didattiche informatizzate. 
In un primo tempo ad esempio, sembrava 
che l’italiano e la storia non dovessero es¬ 
sere toccate da questo rinnovamento; inve¬ 
ce poi abbiamo usato delle unità didattiche 
di queste materie con molto successo. E 
anche per le materie tradizionali quali la 
statistica e la matematica stiamo ancora 
facendo degli esperimenti. 


L’ uso del computer come metodo di inse¬ 
gnamento si diffonde sempre più nelle 
scuole italiane. 

Il progetto SCUOLABIT non è destinato a fi¬ 
nire con questo anno scolastico, ma prose¬ 
guirà e sarà una rubrica fissa del Telesoft- 
ware e sarà anche una rubrica fissa della 
nostra rivista. 

Ospiteremo delle interviste di altri docenti e 
presidi che hanno lavorato a questo pro¬ 
getto e sentiremo il parere degli altri docenti 
e degli alunni. 

I 53 Istituti Tecnici che collaborano al pro¬ 
getto SCUOLABIT saranno una “task for¬ 
ce”, cioè dei circuiti pilota per le altre scuo¬ 
le, allo scopo di far nascere dei “program¬ 
matori di software didattico, che nasca ve¬ 
ramente dalla scuola e non dall’ industria”. 
Per diffondere il più possibile il software 
nelle scuole, il Ministero della Pubblica 
Istruzione sta valutando la possibilità di 
una convenzione con la RAI, affinché que¬ 
sta metta a disposizione delle scuole tutti i 
suoi strumenti e prodotti. 

L’ obiettivo è la messa in onda di 100 pac¬ 
chetti di software l'anno. 

II coordinamento di tutte le attività di speri¬ 
mentazione dovrebbe essere a cura degli 
IRSAE (Istituti Regionali per la Ricerca e 
l’Aggiornamento). 

Il software già prodotto nell’ambito dei corsi 
di aggiornamento nel Piano Nazionale di 
Informatica, è stato raccolto in 12 volumi 
che verranno vagliati e selezionati da un’ 
apposita commissione; i materiali prescelti 
verranno poi rielaborati, ancora controllati, 
pagati e messi in onda. 

La RAI, in collaborazione con la SELECO e 
I’ OLIVETTI, si impegna inoltre a superare 
quei limiti tecnici televisivi che non consen¬ 
tono di trasmettere grossi programmi 
(400-600 k). 

La SELECO ha anche assicurato che da 
giugno di quest’ anno tutti i suoi televisori 
saranno in grado di ricevere il Telesoftware. 
Torniamo ad invitarvi perciò a scrivere alla 
nostra redazione e a darci la vostra prezio¬ 
sa collaborazione per aprire un dialogo ed 
uno spazio di confronto. 


Si ringraziano il Preside dell’Enrico Fermi 
on. prof. Giudiceandrea ed il prof. Vairano 
per le interviste Si ringraziano il prof. Vaira¬ 
no e il p.i. Agamennone per la collaborazio¬ 
ne alla stesura di questo articolo 
Si ringrazia la Seleco S.p.A. nelle persone 
dell’ ing. Tognetti e dell’ ing. Liverotti. ■ 
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'Energia e materia’ nelle antiche fucine, ' immaterialità } della telematica alle soglie 
del 2000. Ponendoti al centro di una vasta rete di scambi informativi puoi catturare tutte 
le notizie e i servizi che t'interessano tra quelli disponibili 24 ore al giorno su Videotel, 
dai giornali telematici interattivi agli scambi di messaggi con altri utenti e alle 
operazioni bancarie a domicilio, dagli aggiornamenti legislativi, amministrativi, 
e finanziari alle teleprenotazioni e teleacquisti. 

Per iniziare puoi consultare gli elenchi telefonici di tutt’ltalia interrogando il ‘12 ' sullo 
schermo del piccolo terminale che la SIP offre per poche migliaia di lire al mese o 
collegando con Videotel un home/personal computer attraverso la normale rete telefonica. 
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AD MAJORA BBS ..." 



di PAOLO CIARDELLI 

Non il solito “contenitore” di software, 
piuttosto un luogo di incontro , un salotto, 
un Forum e, perché no, un Kiosqué di 
scambio di opinioni e di esperienze 


envenuto, nuovo utente! Ec¬ 
co il messaggio che ci acco¬ 
glie accattivante, dopo il log- 
in con Cornar Bbs Supporter, 
il nuovo Forum telematico 
romano. E prima di proseguire la presenta¬ 
zione continua precisando che questo è 
nato con l'intento di proporre un qualcosa 
di nuovo...non il solito “contenitore” di 


software, piuttosto un luogo di incontro, di 
scambio di opinioni e di esperienze. 

IL PROGRAMMA DI GESTIONE 

Un software di gestione che propone una 
nuova filosofia di Bullettin Board System e 
quindi niente paura se inizialmente non tut¬ 
to sarà chiaro! Le richieste di spiegazioni, e 
perché no, le critiche saranno bene accette. 
Si presenta bene e viene perciò chiesto uno 
USER-ID (User Identify "identificativo”) alla 
maniera di bbs dove il "Chat” è di moda. 
Questo dovrà essere usato per connettersi 
con la Cornar Bbs Supporter al momento 
del log-on e sarà quello con cui gli altri 
utenti ci contatteranno e conosceranno. 
Lo User-ID, segue poche regole di sintassi: 
deve essere lungo da tre a nove caratteri e 
non sono permessi numeri, spazi e segni di 


interpunzione. Non viene altresì effettuata 
distinzione tra maiuscole e minuscole. 
Fatto questo per prova appare un messag¬ 
gio simulato per... vedere come suona, dal 
tenore fortemente umoristico. 

Un tocco sensibilmente subliminale. 

MENU PRINCIPALE 

T ... Teleconferenza 

I... Informazioni di sistema 

S ... SIGs (Special Interest Groups) 

M ... Mercatino 
P ... Posta Elettronica 
C ... Configurazione utente 
E ... Elenco utenti COMAR BBS 
X ... Log-off (Termina sessione) 

rANGOLO DELL 7 INTERVISTA 

List "Parliamo di Cornar Bbs Support dal 
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punto di vista tecnico.” 



Cornar "Il nostro software attualmente gira 
su di un Cornar Computer System CCS 386, 
con clock a 25 MHz e 64 Kbyte di cache me- 
mory, hard disk da 98 Mb. scheda VGA, una 
ÈVA 1024 della Tseng con risoluzione di 
1024x768 e monitor 16 pollici EIZO 9070, 
con pari risoluzione della scheda video. 
Completa la configurazione un modem 
Hayes compatibile con che viaggia a 300, 
1200, 2400 Baud. 

Il tutto, naturalmente ci è stato gentilmente 
messo a disposizione dal nostro sponsor: 
"COMAR COMPUTER SYSTEM.” 

List “ Ho visto ed apprezzato la disposizione 
del tutto, molto semplice da usare e simpa¬ 
tico per fare esperienza senza conoscere a 
fondo il bbs." 




Cornar “In effetti abbiamo cercato proprio 
questo: una bbs un po’ diversa da solita 
OPUS (senza togliere niente al software più 
diffuso ndr) e che fosse facile da usare. 
Speriamo di esserci riusciti, certi che gli 
utenti di tutta la grafica e varie abbellimenti 
non gli importa più di tanto dopo la prima 
volta che entrano. 

Infatti certi gadget fanno perdere solo tem¬ 
po, anche se la prima volta sono d’impatto 
favorevole.” 

List "Ma ditemi un po', come è nata l’idea di 
aprire un BBS, a parte la passione per la te¬ 
lematica e l’elettronica?" 

Cornar “Vedi la Cornar si occupa di vendita 
computer e diventa un "gadget” indispen¬ 
sabile in questo campo, prima o poi ed in 
fondo la passione è tutto. 

Personalmente, sono il sysop e mi chiamo 
Fabio Scottoni, studio Scienze dell’Informa¬ 
zione ed intanto sono dipendente di un’al¬ 
tra società. 

L’idea di metter su la Cornar Bbs Supporter 
è nata proprio come ti dicevo, del fatto che 
da utente mi ero stancato di quelle esistenti, 
bene o male, tutte simili e siccome Mauro, il 
cosysop, come amico era d’accordo con 
me ci siamo imbarcati neH'impresa. 

Detto fatto, ci siamo comprati il Software 
negli States ed ora eccoci qua." 

List "Il software che adoperate, a quanto mi 
risulta, è Fido—Net compatibile se non sba¬ 
glio?” 

Cornar “Esatto, ma dato che siamo ancora 
in fase sperimentale, non abbiamo ancora 


acquistato i sorgenti che costano una certa 
cifra e quindi non siamo ancora, dal punto 
di vista prettamente della Policy, come sa¬ 
prai, meglio di me, Fido-Compatibili. 

Per ulteriori precisazioni il Software si chia¬ 
ma The Major Bbs ed è prodotto dalla Ga- 
lacticomm. 

Viene usato per esempio dalla Ashton Tate, 
da alcuni apparati del Governo degli Uni¬ 
ted States ed altri Big americani.” 

List "A quale tipo di utenza vi rivolgete?" 

Cornar "A tutti... ma qui lo dico e qui lo nego 
non vorrei disdegnare gli Hacker, in quanto 
in tutto esiste il buono ed il male... 

Molti si vantano, ma pochi sono veramente 
in gamba tipo quelli nominati da te (ndr nel¬ 
l’intervista abbiamo nominato alcuni mostri 
sacri)." 

List “Problemi tecnici?" 

Cornar "Riguardo ai problemi per ora non 
molti solo il fatto che la seconda linea, quel¬ 
la di casa di Mauro che abita a fianco, non 
la si riesce ad usare se non in alcune ore di 
notte. 

Avrei voluto accoglierti con un CHAT a 3, 
ma non ha ancora chiamato nessuno degli 
utenti abilitati." 

List "A quando sarà possibile il Chat multi¬ 
plo?" 

Cornar “La SIP promette, ma..." 

List “Ho notato l’opzione SIG. Cos'è?" 
Cornar “Trovo che sia la vera novità rispet¬ 


to a Opus. 

Si può spedire un messaggio e fare attach- 
ment di un file (spedire un messaggio con 
"attaccato" un file ndr) 

Pensa che comodità per messaggi tipo: 
"...ho problemi con questo programma. Ti 
mando il listato..." 

Fermo restando che in attesa di un vero 
UpLoad/DownLoad il messaggio può ser¬ 
vire da descrizione e estesa del file "attac¬ 
cato”." 

List "Ma ciò mi fa pensare a ad una serie di 
faximiii spediti con una scheda FAX verso 
un concentratore..." 

Cornar "Bella idea... ma penso difficilmente 
realizzabile qui in Italia. 

Però sarebbe bello di spedire un testo bat¬ 
tuto in elettronico, ricevibile in elettronico o 
su carta alla velocità di 9.600 baud o di più 
e di andare ad installare una cosa del ge¬ 
nere... una società di servizi... che interagi¬ 
sce in maniera sinergica con una Romana 
Recapiti o Pony Express... 

Bella idea ma prima vogliamo altre linee. 
Vedi, il concetto sarebbe quello di fare vera¬ 
mente di questa bbs un luogo di ritrovo, co¬ 
me posso dirti, un salotto?, per program¬ 
matori, ma in cui i neofiti possano VERA¬ 
MENTE imparare qualcosa.” 

List "Sei un idealista e mi piacciono gli 
idealisti, perché fanno tutto per l’estetica e 
la gioia di condividere.Ok, grazie dell'inter¬ 
vista e auguri." 

Cornar “Di nuovo ciao da Fabio e Mauro." 
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AMSTRAD SM2400 



di PAOLO CIARDELLI 

Visto il successo del modem su scheda e 
la nuova normativa liberalizzante sulla 
commercializzazione, eccone una versio¬ 
ne simile esterna 


erto che i costruttori e i desi¬ 
gner dell’Amstrad, non han¬ 
no dovuto sbizzarrirsi molto 
quando hanno ideato il pro¬ 
filo di questa interfaccia. 
Sembra infatti direttamente derivata da 
quella su scheda se non avesse la presa 
posteriore RS 232C, l’alimentazione tramite 
alimentatore esterno e i led di controllo sul 
frontale. 

Di forma compatta, è così sottile da posizio¬ 
narsi sotto un comune apparecchio telefo¬ 
nico, ed è l’ideale per l’utenza professionale 
dotata di un qualsiasi elaboratore. 


CARATTERISTICHE TECNICHE 

Il modem SM2400 è quadristandard ed è 
dotato di funzioni automatiche per ricevere 


e trasferire i dati e programmi secondo le ri¬ 
chieste dell’utente. 

Il nuovo modem dal prezzo particolarmente 
competitivo può funzionare con qualsiasi 
tipo di computer, dal mainframe al mini, al 
comune Personal Computer: è sufficiente 
disporre di una normale porta RS-232. 
Entriamo nel dettaglio dei numeri che spe¬ 
cificano meglio le caratteristiche tecniche 
del Modem Amstrad: 

Abbiamo parlato di quadristandard in fatti 
in modo operativo CCITT, risponde alle rac¬ 
comandazioni V21 300/300 bit/s, V23 
1200/75 o 75/1200 (compatibilità Videotel), 
V22 600/600 o 1200/1200 asincrono, V22bis 
2400/2400 bit/s asincrono 
E non è poco. 

Chiaramente effettua la selezione automa¬ 
tica del modo di trasmissione e della veloci¬ 
tà. Non sono stati dimenticati i colossi USA 
ed è stata assicurata anche la compatibilità 
Bell, in modo V22 e V22bis, consentendo il 
colloquio con i modem Bell 212A. 

Il formato dati è quello classico 7 o 8 bit, pa¬ 
rità pari, dispari, mark, space o nessuna. 
Ancora una peculiarità di default: Set di co¬ 
mandi Hayes compatibile, buffer 40 caratte¬ 
ri, codici estesi, autodial con pulse o tone 
dialling, risposta automatica dopo un certo 
numero di squilli. 


APRIAMO II COPERCHIO 

All’interno la tecnologia travolgente che 
abbiamo riscontrato in altri apparecchi del¬ 
la stessa classe, sembra fermarsi al mon¬ 
taggio di due chip della Rockwell dalla sigla 
volutamente incomprensibile e chiaramen¬ 
te CUSTOM. 

Troviamo invece due particolari degni di 
nota. 

Il primo è il montaggio di un vero altopar¬ 
lante con tanto di magnete e cono in plasti¬ 
ca elicoidale, la timbrica se non altro non è 
stridente, e i due chip uno contenente il 
software e l’altro dalla sigla anonima, sono 
montati su zoccolo. 

Pensiamo, visto che il progettista si trince- 
rebbe dietro un cordiale sorriso silenzioso 
all’orientale, che in quei due alloggiamento 
dovrebbe trovar posto un nuovo software 
per poter pilotare i nuovi chip MODEM ri¬ 
spondente alle nuove raccomandazioni V 
32. Per dovere di cronaca la raccomanda¬ 
zione V 32 riguarda il nuovo standard di 
trasmissione a 9.600 Bit/s. 

CONCLUSIONI 

Secondo le previsioni degli osservatori, una 
delle aree a maggiore sviluppo nei prossimi 
anni dovrebbe essere proprio quella della 
trasmissione dati fra computer, cioè la pos¬ 
sibilità di collegare fra loro due o più com¬ 
puter separati da distanze anche conside¬ 
revoli, al fine di scambiare dati o accedere a 
informazioni utilizzando la comune linea te¬ 
lefonica. 

In ogni caso, prima abbiamo ipotizzato un 
aumento della velocità di trasmissione a 
9.600. Ma rimaniamo con i piedi per terra su 
questa velocità da multa per eccesso di 
quantità di dati sparati sulla linea telefoni¬ 
ca, perché nutriamo alcuni dubbi più com¬ 
merciali che tecnici. 

Ad una conferenza stampa di un’importan¬ 
te industria, abbiamo ammirato delle nuove 
schede FAX che viaggiano a 9.600, senza 
passare su carta il documento, trascodifi¬ 
candolo direttamente dal Personal dove si 
sta lavorando. 

Chi vincerà, i modem ultra veloci o le sche¬ 
de FAX, user friendly sia in trasmissione che 
in ricezione? ■ 
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Ada tta tori 
Telema ti co 
Commodore 


di GIAN PIERO ROSI 

Si conclude con questa seconda puntata la 
breve carrellata sulle opzioni dell’Adatta¬ 
tore Telematico Commodore , che speria¬ 
mo vi aiuti ad entrare con meno difficoltà 
nel mondo della telematica. 

Seconda parte 
VIDEOTEL 

Abbiamo visto che con l’opzione F5 del me¬ 
nu principale si accede aH’ambiente VI¬ 
DEOTEL, viene cioè selezionato lo standard 
V23 e la visualizzazione secondo lo stan¬ 
dard Videotex. 

Quello che appare è uno dei due menu 
“off-line” previsti, il quale vi offre le sei op¬ 
zioni, che vi illustriamo. 

Chiamata manuale “FI" 

Con questa opzione è possibile collegarsi 
al servizio voluto, sia componendo manual¬ 
mente il numero telefonico, sia facendolo 
comporre al computer. Quando vi apparirà 
la richiesta “NUMERO?", potrete digitare il 
numero 165 seguito da RETURN. Nel caso 
siate in un distretto in cui Videotel non è 
presente dovrete comporre l’apposita nu¬ 
merazione interurbana, utilizzando il segno 
meno (-) per separare il prefisso dal nume¬ 
ro. 

Apparirà la scritta “Chiamata" seguita dai 
numeri da Voi digitati. 

Appena il computer avrà composto il nu¬ 
mero telefonico, vi comunicherà con il mes¬ 
saggio “Attendo Carrier” che è in attesa 
della portante inviata dal centro Videotel. 


Dopo pochi istanti l’adattatore aggancerà 
la portante, cancellerà lo schermo e farà 
apparire il cursore che compone le pagine 
del Videotel. 

A questo punto la connessione è avvenuta 
e potete interagire con il servizio, secondo 
le modalità specifiche illustrate nella sezio¬ 
ne apposita. 

Come abbiamo detto prima, si può compor¬ 
re manualmente il numero del servizio desi¬ 
derato, digitando un semplice RETURN alla 
richiesta del numero. 

Chiamata da agenda “F3” 

Se avete memorizzato nella vostra agenda 
su disco dei numeri telefonici ed i corri¬ 
spondenti tipi di servizio, basterà semplice- 
mente digitarne il nome per effettuare il col- 
legamento! 

Modo disco “F4” 

Con questa opzione si può accedere al di¬ 
sco per visualizzare i file memorizzati, lo 
spazio ancora disponibile o per inviare in 
modo diretto dei comandi all’unità disk dri¬ 
ve. Si può scegliere fra Catalog ($), modo 
DOS (>) o STOP. Premendo RETURN si tor¬ 
na al sottomenu principale. 

Edit mailbox memoria “F7” 

Nel software dell’adattatore telematico è 
implementato un editor per la stesura di 
messaggi off-line. È possibile utilizzare per 
memorizzare i vostri messaggi il disco op¬ 
pure la memoria. Nel primo caso sarà nec¬ 
cessario inserire il nome di un file già esi¬ 
stente. 

Questo editor contempla l’uso dei tasti cur¬ 
sore, del DELETE e dell’INSERT. 

Il segno cancella tutti i caratteri alla sua 


destra, mantenendo lo schermo in forma 
logica e leggibile. 

L’editor permette di ottenere, premendo 
SHIFT -I- SPACE, dei caratteri di formatta¬ 
zione che saranno salvati su disco, ma non 
verranno comunque riconosciuti dal VI¬ 
DEOTEL. Quando avrete terminato di scri¬ 
vere il vostro messaggio, dovrete inserire un 
marcatore (premendo SHIFT + STOP) per 
comunicare al Videotel la fine del messag¬ 
gio. Con il tasto “ESCAPE” (che nel Com¬ 
modore corrisponde alla “freccia a sini¬ 
stra" in alto a sinistra sulla tastiera) premu¬ 
to insieme ad una lettera maiuscola, si pos¬ 
sono inserire eventuali codici colore. Sulla 
sezione dedicata all’uso del Videotel sono 
indicati i colori abbinati a ciascuna lettera. 
Premendo “FI” “F3” il messaggio verrà 
salvato su periferica, mentre premendo 
“FI” “F8" si abbandonerà la funzione di 
editing. Chiaramente se all’inizio avevate 
dichiarato di voler utilizzare la memoria per 
conservare il messaggio, le opzioni riguar¬ 
danti il salvataggio non saranno attivate. 

Ritorno Menu precedente “F8” 

Con il tasto “F8” si ritorna al menu prece¬ 
dente e quindi, in questo caso, al menu 
principale. 


MENU ON LINE 

Per accedere a questo menu si deve preme¬ 
re il tasto FI. 

Per tornare “on line” premete il tasto Com¬ 
modore insieme alla lettera “C”. 

Ecco quindi le "funzioni on line”: 

Catalog disk “F2" 

Questa funzione di accesso al disco è ana¬ 
loga all’opzione “MODO DISCO" del menu 
off-line. 

Salva frame “F3" 

Nel caso vogliate memorizzare su disco o 
cassetta una pagina o un messaggio rice¬ 
vuto, potrete farlo usando questa opzione. 
Il numero della pagina, se presente, vi sarà 
proposto come nome del file ed un even¬ 
tuale file con lo stesso nome andrà perduto. 
Ricordate che la massima lunghezza am¬ 
messa per i nomi è di 16 caratteri. 

Reveal “F4” 

Con questa opzione è possibile leggere le 
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scritte "nascoste" con un particolare codi¬ 
ce. 

Telesoft “F5" 

Programmi appositamente codificati sulle 
pagine del Videotel possono essere caricati 
e trasferiti su periferica, per essere succes¬ 
sivamente utilizzati. Ovviamente è necessa¬ 
rio che il Telesoftware dei Fornitori di Infor¬ 
mazioni adotti il medesimo standard. Le 
istruzioni per l’uso e i dati sulle dimensioni 
del programma sono contenuti nelle tre 
schermate (Frame a-b-c) che lo precedono, 
l'ultima delle quali informa l’utente che il ca¬ 
ricamento del programma (DOWNLOA- 
DING) inizierà premendo il tasto F5. Una 
stringa di circa trenta caratteri vi mostrerà 
sull’ultima riga l’header del programma. 
Una volta attivato il downloading i file ver¬ 
ranno automaticamente salvati su disco o 
cassetta e dei segnali acustici e visivi vi in¬ 
formeranno sull’andamento del processo. 
A salvataggio ultimato tornerete on line, men¬ 
tre sarà visualizzata l’ultima pagina usata. 

Stampa/Mailbox 

Questa opzione vi permetterà di gestire l'in¬ 
vio e la stampa dei messaggi. Potrete invia¬ 
re un FILE da disco premendo “f”, un mes¬ 
saggio dalla memoria premendo “m”, o 
stampare la pagina corrente con “p”. 
Potete selezionare una stampa in positivo o 
in negativo, mentre per definire il tipo di 
stampante dovete utilizzare l’opzione “peri¬ 
feriche” del menu principale. 

Rinvio pagina (*00) “F7" 

Può succedere che la linea telefonica sia 
disturbata e che quindi riceviate una pagi¬ 
na in modo non corretto. Niente paura: con 
il tasto F7 è possibile richiederne l’invio. 

Fine connessione "F8" 

Questa funzione provvede ad inviare il co¬ 
dice *90’, necessario per disconnettersi dal 
Videotel. 

In questo caso, però, non vi sarà possibile 
leggere eventuali messaggi per voi. 
Fornendo manualmente il codice, invece, 
se ci fossero dei messaggi sarebbe neces¬ 
sario digitare di nuovo il tasto 

Il software dell’adattatore telematico Vi per¬ 
mette di usare i tasti da 0 a 9, i tasti funzione 
(come sopra illustrato) ed utilizza il tasto 


al posto di Infine il tasto "escape" è so¬ 
stituito dalla "freccia a sinistra” in alto a si¬ 
nistra sulla tastiera. 

PAGINE GIALLE ELETTRONICHE/B.B.S. 
“F7" 

Con questa opzione è possibile accedere a 
quei servizi che si basano sull’invio di carat¬ 
teri appartenenti all’insieme ASCII, e che ri¬ 
chiedono lo scroll del video. 

Le funzioni previste nel sottomenu, sono 
perfettamente analoghe a quelle del menu 
Videotel, tranne che per le opzioni F5 ed F6: 

Visualizza file “F5” 

Con questa opzione si può leggere un file di 
testo memorizzato su disco, specificando 
se si tratta di codice Commodore ASCII 
(“c") o ASCII puro (“a”). Con la barra spa¬ 
ziatrice si effettua una pausa momentanea, 
mentre premendo “p” e “v” si attiva e si di¬ 
sattiva la stampante. 

Stampa file "F6” 

Premendo FI per effettuare il collegamen¬ 
to, verranno proposti quattro tipi diversi di 
configurazioni standard: 

FI) Ricezione a 1200, trasmissione a 75; pa¬ 
rità EVEN, né ECHO, né LINE FEED. ORIGI¬ 
NATE. 

F2) Ricezione a 75, trasmissione a 1200. pa¬ 
rità EVEN, né echo né line feed. ANSWER. 

F3) Ricezione e trasmissione a 300, parità 
SPACE (neutra), né echo, né line feed. ORI¬ 
GINATE. 

F4) Ricezione e trasmissione a 300. parità 
SPACE, echo LOCALE e REMOTA. ANSWER. 

Se la ricezione è disturbata, è necessario 
settare manualmente i parametri di connes¬ 
sione, utilizzando il tasto funzione F7. 
Potrete così definire il Baud Rate, la lun¬ 
ghezza della parola, la parità, l’eco in loca¬ 
le, in remoto e l’auto line feed sia in remoto 
che in locale. È sempre possibile, in caso di 
errore, tornare alla schermata precedente 
con il tasto F8. 

Menu on line 

Anche per quanto riguarda questa modali¬ 
tà, premendo FI si accede ad una nuova 


serie di funzioni: 

F2) mostra la directory del disco. La barra 
spaziatrice interrompe lo scroll, mentre RE¬ 
TURN fa tornare “on line” 

F3) attiva il salvataggio su un file (prece- 
dentemento aperto con la funzione F4) di 
tutti i dati trasmessi e ricevuti. Se il file era 
già attivo, premendo F3 viene interrotto il 
salvataggio, lasciando comunque aperto il 
file 

F4) apre un file su disco, predisponendolo 
all’uso della funzione F3. Vi verrà chiesto il 
nome del file da aprire, e qualunque file con 
lo stesso nome sarà sovrascritto. Se il file 
era già aperto, con F4 lo chiudete 

F5) attiva la trasmissione da un file prece¬ 
dentemente aperto con F6. Dovrete indica¬ 
re il formato, scegliendo tra CBM ASCII o 
ASCII puro. Nel primo caso tutto funzionerà 
come se i caratteri fossero digitati dalla ta¬ 
stiera. Potranno quindi essere usati anche i 
tasti funzioni, permettendo così la program¬ 
mazione di "file di comandi" per l’esecuzio¬ 
ne di operazioni ripetitive 

F6) apre o chiude un file su disco che andrà 
utilizzato con la funzione F5. Vi verrà chie¬ 
sto il suo nome e se si tratta di CBM ASCII o 
ASCII puro 

F7) abilita o disabilita la stampa dei dati ri¬ 
cevuti 

F8) interrompe la connessione sospenden¬ 
do il carrier in trasmissione. 

È possibile attivare altre funzioni, tramite la 
pressione del tasto CONTROL abbinato ad 
una lettera: 

CTRL + B 

Invia un break di circa 200 millisecondi in 
modo da interrompere, in alcuni tipi di servi¬ 
zio, l’esecuzione di una funzione CTRL + C 
Attiva o disattiva il CAPS LOCK, che risulta 
inserito all’atto dell’accensione (come indi¬ 
cato sulla riga di stato). Sul C128 si può 
usare il tasto "Caps Lock" in alternativa 

CTRL + E 

Attiva o disattiva l’Echo LOCALE 
CTRL + L 

Attiva o disattiva il line feed automatico 
CTRL + T 

Attiva o d _ attiva il timer sullo schermo ■ 
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Un Modem 
Coiora to 



di PAOLO CIARDELLI 

Spesso durente le lezioni di marketing si 
insegna che quando si cambia strategia di 
vendita, il primo parametro da prendere in 
considerazione è la forma ed il colore 


ll’interno di un mercato su¬ 
per affollato di schede mo¬ 
dem tutte con le medesime 
caratteristiche spicca questa 
nuova scheda, commercia¬ 
lizzata dalla INFOX, che si presenta per la 
sua notevole quantità di particolari colorati. 
In effetti si presenta come tutte le schede 
modem, a standard half size per elaboratori 
IBM e compatibili. 

Però la peculiarità che subito salta gli occhi 
è il supporto metallico che sta dietro ogni 
scheda di colore nero fumo, tocco profes¬ 
sionale, e la quantità di componenti discreti 
dal colore vivace. 

C’è abbondanza di condensatori al polie¬ 


stere dal colore azzurro Italia, etichette ar¬ 
gentate ed il trasformatore di separazione 
giallo. 

Passato il primo momento in cui l’abbiamo 
apprezzato per la plocromia, siamo andati 
a fondo nell’esame e abbiamo notato con 
piacere la accuratezza nei collegamenti 
delle saldature, la preveggenza nello zoc¬ 
colare i componenti critici o soggetti a cam¬ 
biamenti o upgrade, in special modo la 
ROM, e diciamolo un po’ di tenerezza ce l’¬ 
hanno fatta que due o tre transistor che or¬ 
mai sono obsoleti su schede ad alta inge- 
gnerizzazione. 

Il dip switch, il trimmer per la regolazione 
del volume dell’altoparlante piatto e l’uscita 
della linea telefonica terminano la dotazio¬ 
ne di prese, spine ed affini. 


STANDARD 

Le velocità supportate sono i 300 ed il 1200 
bit al secondo, un valori ormai accettabili e 
giudichiamo più che sufficienti a supporta¬ 
re delle inter comunicazioni per il trasferi¬ 
mento di file di medie di dimensioni. 


COUEGHIAMOIO 

Semplice e precisa, questa scheda si inseri¬ 
sce con facilità in uno degli slot liberi, a 8 
bit. 

A corredo c'è un software con cui ci si può 
collegare senza dover far ricorso ad altri 
programmi. Il manuale è in lingua inglese 
ed è esauriente dal punto di vista dei co¬ 
mandi Hayes compatibili. 

Il che vuol dire che è in grado di riconoscere 
e utilizzare tutta quella serie di comandi di¬ 
venuti uno standard per la gestione della 
comunicazione via modem. 


PREZZO E CONCLUSIONI 

Il prezzo relativamente contenuto è ade¬ 
guato alle prestazioni e alle funzioni 
In sostanza, il Minimodem è un onesto mo¬ 
dem portatile, con l’indubbio vantaggio del¬ 
le dimensioni e dell’indipendenza del¬ 
l’alimentatore, paragonabile come qualità 
persino a sistemi fissi o su scheda di costo 
superiore. 
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World Wide Net 


Attivato a pag 64924 il servizio TELEFAX 
dà la possibilità a tutti gli utenti Videotel 
di inviare telefax alfanumerici agli utenti 
della rete telefax in tutto il mondo 



COLLEGAMENTO A VIDEOTEL DA 
92 PAESI IN TUTTO IL MONDO 


■I JB a come è possibile tutto que- 
| sto. Semplice, 830 numeri te- 

lefomci attraverso i quali col- 

Tfl ■ legarsi con Videotel al costo 
■ ■ ■ di una telefonata locale più 
le modiche tariffe della rete World Wide Net. 
Capita spesso, al giorno d'oggi, di trovarsi 
all’estero, viaggi di lavoro, di piacere, di stu¬ 
dio, tanti possono essere i motivi. 

Un fatto è certo: si è sempre più spesso fuo¬ 
ri dei confini del nostro paese! 

E può capitare di dover consultare uno dei 
servizi Videotel: un orario aereo, un numero 
telefonico, o di telex, in Italia, un orario fer¬ 
roviario, le ultime notizie locali, il listino del¬ 
la borsa, una statistica, una legge, un prez¬ 
zo, le ultimissime sugli appalti, la propria 
Mailbox! 

E se c'è da dare una disposizione urgente 
alla propria banca ? 

Insomma, chi più ne ha più ne metta! 



Sfruttando la rete telematica del World Wide Net sara possibile collegarsi da tutto il mondo 
con Videotel. 


DA OGGI TUTTO QUESTO È 
POSSIBILE ATTUA VERSO LA 
WORLD WIDE NET 

Da cosa parte tutto ciò? Dalla considera¬ 
zione che il servizio più utilizzato, negli altri 
paesi, è il collegamento con la propria mail¬ 
box. L’utilizzo razionale di questo servizio 
permette infatti di rimanere collegati col 


proprio ufficio, con la casa, con i propri col- 
laboratori, con i familiari, in qualunque par¬ 
te del mondo uno si trovi. 

In Italia verranno depositate nella mailbox 
tutte le comunicazioni di interesse persona¬ 
le, e verranno prelevate da dove siete come 
se vi trovaste in Italia e, sempre come se fo¬ 
ste in Italia, potrete inserire i vostri messaggi 
in mailbox sia per l’Italia che per il resto del 
mondo. 
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COME E DA DOVE 

Non arriviamo al punto futuribile del perso¬ 
nal portatile completo di modem, ma pen¬ 
siamo che in realtà ormai in tutti gli hotel è 
facile trovare un terminale a disposizione 
dei clienti. Terminali pubblici (anche della 
World Wide Net) si trovano negli atri delle 
stazioni ferroviarie e in quelli degli aereo- 
porti Presso i clienti e fornitori all’estero, è 
facile trovare un terminale telematico da 
usare. In milioni di case in Europa e nel 
mondo (tre milioni e mezzo nella sola Fran¬ 
cia) esiste un terminale da poter usare. 
Attraverso la vasta rete di trasmissione dati 
della World Wide Net nel mondo, oggi Vi¬ 
deotel non è più la rete di una piccola na¬ 
zione: oggi diventa mezzo di comunicazio¬ 
ne con il mondo intero. 

Le tariffe in lire italiane per l’utilizzo del ser¬ 
vizio Videotel atrraverso gli 830 numeri tele¬ 
fonici della rete World Wide Net in 92 paesi 
in tutto il mondo sono le seguenti: 

Per ogni chiamata 500 

Per ogni minuto o fraz 600 

Per ogni 1 000 caratteri o fraz 1 000 

CALCOLO DEI COSTI DI UNA 
SESSIONE TIPO 



Per la chiamata 500 

Tempo per prelevamento (visione e/o stam¬ 
pa e/o memorizzazione) di 5 messaggi (2 
000 caratteri) trovati in mailbox: 1 minuto 
600 

Tariffa volume per i messaggi prelevati: 2 
000 caratteri 2.000 

Tempo per invio di 3 messaggi (1 000 carat¬ 
teri): 2 minuti 1.200 

Tariffa volume per i messaggi inviati: 1 000 
caratteri 1.000 

COSTO TOTALE DELLA SESSIONE 5.300 

Sono da aggiungere i costi del tempo di 
connessione Videotel SIP (Lit 150 ogni 3 o 9 
minuti, secondo l’ora italiana corrispon¬ 
dente), che saranno addebitati sulla vostra 
password il costo della chiamata al numero 
World Wide Net più vicino, quindi, solita¬ 
mente, il costo in rp + ta locale di una chia¬ 
mata urbana. 

La stessa operazione, a mezzo telefax, co¬ 
sterebbe circa il triplo, ma non è facile tro¬ 
vare un hotel che permetta operazioni di 
polling per ricevere gli eventuali messaggi 
che la vostra segretaria potrebbe avervi la¬ 
sciato sul fax, e fare polling durante l’orario 
d’ufficio è ancora più difficile e poi bisogna 




rr *• 


_ ' f 1 , ' 


Dall’estero si potranno consultare a piacimento i servizi offerti da Videotel: dal listino di borsa agli 
orari dei treni. 
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possedere un telefax! 

Stesso discorso vale per il telex: e la stessa 
operazione costerebbe circa 20 volte di più. 

VELOCITÀ DEL RECAPITO 

L’inoltro del messaggio è garantito entro 15 
minuti dal ricevimento da parte del Centro 
Elaborazione, e naturalmente l'abbiamo 
controllato orologio alla manoe e si è con¬ 
fermato veritiero. 

TARIFFE 

ITALIA Lit 3 000 (sino a 553 caratteri) 
EUROPA Lit 5 000 (sino a 553 caratteri) 

3 PAESI EXTRAEUROPEI Lit 7 000 (sino a 
553 caratteri) 

SERVIZI 

Ma World Wide Net non è solo questo. 

A lato compaiono i servizi presenti e quelli 
in allestimento contrassegnati con un * 


(asterisco). 

01 W W N ~> VDT 
02 Banche dati 
03 Link 

04 Segreteria telefonica 

* Beep 

* Meeting communication 
07 Telex (GCU) 

08 Teletex (GCU) 

09 Telefax 

* Telepaghe 

* Aereotaxi 

* Nolo automezzi 

* Telecontabilità 

* Vendita ed assistenza hardware 

* Vendita ed assistenza software 

* Teletraduzioni 

* Teleprotesti 

* Informazioni commerciali 

* Ricerca bilanci 

* Visure catastali 

* Teleappalti 

* Servizi assicurativi 


* Servizi finanziari 

* Consulenza tributaria 

* Consulenza legale 

* Cons societaria internazionale 

* Domiciliazioni 

* Recapiti 

* Archiviazione files 

* Calcoli finanziari 

* Financial week 

* W W N express 

* Recapito e-mail 

* Refiling 

* Terminali telematici pubblici 

* Orari aerei tutto il mondo 

* Orari treni tutto il mondo 

* Orari navi tutto il mondo 

* Prenotazioni aerei 

* Prenotazioni treni 

* Prenotazioni navi 

* Prenotazioni hotels 

* Biglietteria aerea 

* Biglietteria ferroviaria 

* Biglietteria marittima 

* Vouchers hotels ■ 
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VIDEOTEL 



CENTRO NAZIONALE 
TELEMA TICO 


Al nodo *525 x vengono offerti tre nuovi collegamenti, in allestimento, con agenzie 

stampa per fornire “notizie flash” sui mag- 

servizi di informazione telematica CNT g j or j avvenimenti sportivi. 

SPORT ; CNT TEST e PROMETEO 


I primo, CNT SPORT, è un 
servizio di informazione sugli 
avvenimenti sportivi in Italia 
e all’estero di maggiore inte¬ 
resse. Il servizio, alla pagina 
*5251 x , sarà ben presto gestito da un ga- 
teway. Alle attuali pagine di informazione, 
dalle quali si può venire a cooscenza dei ri¬ 
sultati, le classifiche e i calendari prossimi 
turni dei vari campionati e tornei, si aggiun¬ 
gerà la possibilità di consultare grafici, sta¬ 
tistiche e confronti storici. Un vero e proprio 
Data Base a cui accedere per ogni tipo di 
cogitazione e di ricerca. 

Non sono stati naturalmente dimenticati i 


CNT TEST 

Il secondo servizio è situato aH’interno della 
rubrica CNT PASSATEMPI da dove è possi¬ 
bile effettuare dei TEST attitudinali, quali: 
“OTTIMISTI 0 PESSIMISTI?”, “MANAGER 
TEST”, "AVETE BUON GUSTO ?” ed altri, 
appositamente creati per questa applica¬ 
zione telematica. f 

L’utente dovrà digitare *52588 x e scegliere 
uno dei test proposti. I vari test, aggiornati 
periodicamente, si compongono di un mini¬ 
mo di dieci domande alle quali corrispon¬ 
dono varie risposte con diversi punteggi as¬ 
sociati. Alla fine dell’ultima domanda, la 
somma dei punteggi parziali permette di 


consultare un profilo attitudinale. 


PROMETEO 

Con "Prometeo", Associazione culturale 
giovanile, che il C.N.T. offre gratuitamente 
alla pagina *52531?, il centro sta cercando di 
creare un servizio rivolto prettamente ai 
giovani. Infatti questa iniziativa è rivolta a 
tutti i giovani e la sua intenzione è quella di 
voler creare la prima “vera associazione” 
apartitica, nella quale tutti gli utenti del ser¬ 
vizio potranno intervenire, proporre e sug¬ 
gerire iniziative di qualsiasi genere. 


INTERVISTA Al F.l. 

Essendo una società giova e gestita da gio¬ 
vani ci è sembrato opportuno andare a visi- 
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Tanti modem a scheda per comu 


Modello 

Velocità 

Standard 

Autocall 

Correttore 

Personal 

È facile, oggi, utilizzare il personal computer per col¬ 
legarsi a Videotel, Pagine Gialle Elettroniche, banche 
dati o aggiornare programmi e trasferire archivi gra- 

M3-12 

300FD, 1200HD 

V21/V23 

AT 

— 

XT/AT 

zie ai modem a scheda Digicom. 

La più completa gamma di proposte per soddisfare ogni 

SNM12 

300FD, 1200FD 

V21/V22 

AT 

Opz. MNP 

XT/AT 

necessità di trasmissione dati su linea commutata da 

300 Bd fino a 2400 Bd sia per funzionamento asincro- 

SNM12P 

300FD, 1200FD 

V21/V22 

AT 

Opz. MNP 

PS 2/50/60/80 

no (start-stop) che sincrono (BSC, SDLC, VIP, ecc.). 

Tutti i modem, regolarmente omologati dal Ministe- 

SNM14 

300FD, 1200FD, 

2400FD 

V21/V22 

V22 bis 

AT/V25 bis 

MNP 

XT/AT 

ro P.T., dispongono della chiamata automatica a stan¬ 
dard AT e V25bis per adattarsi ai già diffusi 
programmi di comunicazione o emulazione. 

Per le applicazioni più sofisticate sono utilizzabili i 

SNM16 

300FD, 1200FD 

V21/V22 

AT/V25 bis 

MNP 

PS 2/50/60/80 

modelli multistandard capaci di adattarsi in modo au¬ 
tomatico alla velocità e al tipo di modulazione del mo- 

SNM18 

300FD, 1200FD 

V21/V22 

AT/V25 bis 


Convertible 

dem corrispondente senza variare predisposizioni o 














altro. È possibile, così, migrare da un servizio telema¬ 
tico all’altro con la massima semplicità d’uso evitan¬ 
do modifiche sui parametri del software di 
comunicazione. 

Dove necessita trasferire dati con il massimo grado di 
esattezza, anche in presenza di linee particolarmente 
disturbate, sono consigliate le schede che dispongono 
del correttore automatico d’errori. 

Per trasmissioni asincrone, la scheda modem si pre¬ 
senta verso il bus del P.C. come un’interfaccia seriale 
standard (da COM 1 a COM 4) diversamente per ap¬ 
plicazioni sincrone è disponibile un ingresso ausilia¬ 
rio RS 232 per l’emulatore specifico. 

Digicom offre schede modem per tutti i più diffusi per¬ 
sonal computer disponibili oggi sul mercato: dai mo¬ 
delli da tavolo (XT, AT, M24, PS2 o compatibili) ai 


portatili (24 ore, TI 100, T3100, ecc.). 

Grazie al modem interno il P.C. abbandona l’isola¬ 
mento primordiale per diventare elemento attivo di una 
rete telematica distribuita usabile per: trasmettere or¬ 
dini, richiedere listini, innoltrare corrispondenza elet¬ 
tronica o semplicemente consultare data base. 
Acompe nd io delle già elevate prestazioni dei suoi mo¬ 
dem integrati Digicom mette a disposizione il softwa¬ 
re di comunicazione DIGITALK sia su dischetto da 
5” 1/4 che 3”l/2. 

Con DIGITALK l’utente può, da P.C.: emulare ter¬ 
minali VT100, VT52, 3101, TTY o Videotel, gestire 
un rubrica telefonica personalizzata, realizzare tra¬ 
sferimento file protetto (Xmodem, Kermit) e crearsi, 
con l’editor interno semplici programmi per l’invio o 
la ricezione automatica di dati mediante modem. 


Adiqicom 

Sede Legale, Direzione e Stabilimento 

GALLARATE (Varese) Tel. (0331) 78.34.09 


Filiale di ROMA Tel. (06) 51.34.628 

Filiale di BOLOGNA Tel. (051) 55.87.09 












Prometeo, nelle intenzioni dei promotori dell'iniziativa, vuole diventare un forum telematico che permetta lo scambio di opinioni ed il dibattito fra igio¬ 
vani di tutto il paese, permettendo alle persone di incontrarsi in un 'ideale sala riunioni senza confini. 


tare le persone dopo aver "consultato" le 
pagine su VIDEOTEL. 

List: “Come nasce la il Centro Telematico 
Nazionale?" 

CNT: “Bene la società è nata nel mese di 
gennaio ed ha mosso i suoi primi passi nel 
Videotel Sip diventandone un Fornitore di 
Informazioni (F.l.).’’ 

List: “Quali sono gli scopi che perseguirà?" 

CNT: “Il CNT, come F.l. Videotel cercherà di 
perfezionare sia qualitativamente che 
quantitativamente il proprio servizio in mo¬ 
do da poter sfruttare il proprio “know-how" 
per costruire e gestire il servizio conto terzi. 
La nostra è infatti una società di servizi che 
mette a disposizione dei suoi clienti la pro¬ 
pria professionalità per costruire un Video¬ 
tel più utile e maturo verso quella cultura te¬ 
lematica frontiera europea del ’92." 



List: “Da dove è scaturita la volontà di fon¬ 
dare un servizio telematico?" 

CNT: "È una società di servizi informatici 
specializzata nel settore telematico e le mo¬ 
tivazioni sicuramente risiedono nella com¬ 
posizione societaria. 

Infatti è prevalentemente composta da gio¬ 
vani, provenienti da varie esperienze lavo¬ 
rative nel campo dell'Informatica, e mira ad 
offrire dei servizi sempre più completi e 
competitivi. Sin dall’inizio, è stata nostra cu¬ 
ra voler privilegiare l’aspetto professionale 
e la qualità dei servizi offerti, proprio per 
mettere in risalto l’alto grado di specializza¬ 
zione raggiunto dalla nostra area tecnica 
nell’elaborazione e nella grafica delle pagi¬ 
ne Videotel. 

Questi nostri sforzi mirano a fornire infor¬ 
mazioni precise e di chiara consultazione 
per l'utente.” 

List: “Sviluppi futuri?” 
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VIDEOTEL 



Col servizio CNT SPORT si può essere sempre 
informati sugli avvenimenti sportivi di maggio¬ 
re interesse in Italia e all'Estero. 


CNT: “Proprio per mantenere fede ai nostri 
propositi, offriamo attualmente solo due 
servizi: CNT SPORT e CNT TEST; ma a que¬ 
sti ne verranno affiancati, entro la fine del¬ 
l’anno, innumerevoli altri, relativi ad una va¬ 
sta gamma di argomenti. È infatti nostra in¬ 
tenzione attivare dei servizi nel settore eco¬ 
nomico, lavorativo, finanziario e politico. 
Vogliamo sottolineare che la nostra politica 
aziendale non prevede, per la consultazio¬ 
ne degli stessi, alcun costo aggiuntivo a 
quello previsto dalla Sip.” 


List: “Come viene gestito il servizio?” 


CNT: "Attualmente il servizio CNT viene ge¬ 
stito nel Master Data Base (MDB) del centro 
Videotel al nodo *525 x . Le pagine di tutti i 
servizi vengono editate attraverso sofistica¬ 
ti software dedicati che permettono una fa¬ 
cile composizione grafica e una rapida ela¬ 
borazione del testo. L’aggiornamento di 
tutte le pagine viene effettuato attraverso il 
collegamento diretto al centro Videotel in 
modo "bulk update". Stiamo lavorando per 
collegare un gateway (calcolatore esterno) 
per potere offrire un servizio più completo 
(consultazione banche dati) e dare le infor¬ 
mazioni in tempo reale. Il calcolatore ester¬ 
no in ambiente UNIX, che sarà collegato al 
Videotel, ha la possibilità di gestire fino a 32 
richieste contemporanee, espansibili a 64 
se il numero di consultazioni lo richiederà." 




Nome Servizio. 

CNT SPORT 

Fornitore di Informazioni: 

C.N.T. srl 

Host: 

VIDEOTEL 
Pagina VTL: 

*5251 x 

Modalità di funzione: 
Accesso libero 


Nome Servizio: 

CNT TEST 

Fornitore di Informazioni: 

C.N.T. srl 

Host: 

VIDEOTEL 
Pagina VTL: 

*52588 x 

Modalità di funzione: 
Accesso libero 


Informazioni: 

C.N.T. srl 

Piazza Risorgimento 14 
00192 - ROMA - 
Tel. 06/3250277-8 
Fax 06/3250281 
Mailbox 021118078 


Informazioni: 

C.N.T. srl 

Piazza Risorgimento 14 
00192 - ROMA - 
Tel. 06/3250277-8 
Fax 06/3250281 
Mailbox 021118078 
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PER SAPERNE DI PIU 



AUA RICERCA 
DEGU SPRITES 


di CORRADO MARCHI 


Una serie di interessanti indicazioni per il migliore utilizzo del 
programma SPRITES contenuto nel disco WELCOME 


on avendo mai visto su LIST informazioni riguardan¬ 
ti il programma SPRITES, contenuto nel disco WEL¬ 
COME, ho pensato che forse potevano interessare 
alcune utili informazioni che ho scoperto casual¬ 
mente. 


AUA RICERCA DECII SPRITES 

Dopo aver caricato il disco WELCOME, premiamo BREAK e diamo il 
comando *ROMS, verrà visualizzata la situazione della memoria 
ROM e delle 4 pagine di RAM. 

A questo punto dopo aver notato uno Sprites ROM 0.6 01 teniamo 
la sorte con il comando *HELP SPRITES e... siamo fortunati il pro¬ 
grammatore ci ha dato la possibilità di conoscere i comandi di que¬ 
sto pseudo linguaggio. 

Le informazioni che appaiono sono se il programma è attivo, il nu¬ 
mero massimo di sprites, i bytes liberi e quanti sprites sono definiti. 


I COMANDI 

*SPRITE attiva il programma 
*NOSPRITE disattiva il programma 

*SEDIT n edita lo sprite numero n (sia per creare che per modifica¬ 
re) 

*SEDIT v,n copia lo sprites numero v in quello numero n 
All'interno dell’editor i tasti agiscono così: 
fO Undelete Delete abilita alternativamente U = spostamento 
D = scrittura 

fi riempie la riga fino a un colore diverso 
f2 riempie la colonna fino a un colore diverso 
f3 aumenta le righe (sempre di un pixel alla volta) 
f4 aumenta le colonne (dipende dal MODE) 
f5 inserisce righe e aumenta l’altezza 
f6 inserisce colonna e non aumenta la larghezza 


f7 specchio laterale 
f8 specchio verticale 

TASTI "0123456789ABCDEF" per cambiare i colori 
RETURN riempie un pixel con il colore prescelto 
COPY riempie un pixel con il colore bianco 
DELETE riempie un pixel con il colore nero 
ESCAPE esce dall’editor 
TASTI CURSORE spostamento di un pixel 
SHIFT +FRECCE spostamento di 8 pixel 
CTRL + FRECCE spostamento ai margini estremi 
Gli altri comandi sono: 

*SDELETE n cancella lo sprite numero n 

*SRENUMBER v,n cambia numero a uno sprite 

*SSAVE nomefile salva sul disco gli sprites definiti 

*SLOAD nomefile carica dal disco gli sprites in memoria altri sprites 

*SMERGE nomefile Aggiunge agli sprites in memoria altri sprites 

memorizzati su disco (Attenzione se uno sprite ha lo stesso numero 

di quello su disco viene perso) 

*SNEW cancella tutti gli sprites presenti in memoria 
E ora dopo aver creato e salvato gli sprites ecco come usarli. 
All’inizio del programma in BASIC mettere l’istruzione *SPRITE e 
*SLOAD nomefile. 

Meglio creare un programma del tipo: 

10 REM caricatore 
20 *SPRITE (attiva gli sprites) 

30 *SLOAD nomefile (carica gli sprite definiti) 

40 CHAIN "ProgBasic” (carica il programma in BASIC) 

Scegliere lo sprite (n) che vogliamo visualizzare con ‘SCHOOSE n 
oppure VDU 23,27,0,n,0;0;0; 

Visualizziamolo con il comando 

PLOT 237,coorX,coorY coordinate assolute 
PLOT 233,coorX,coorY coordinate relative 

I comandi VDU 23,27,1 ,n,0;0;0; e *SGET n cancellano lo sprite 

Con le varie tecniche di animazione si ottengono risultati apprezza¬ 
bili senza usare lo schermo ombra (SHADOW) e senza linguaggio 
macchina. Provare per credere. 

Ad esempio, dopo aver disegnato con *SEDIT 1 una mano aperta e 
con *SEDIT 2 una mano chiusa, plottando alle stesse coordinate in 
successione gli sprites 1 e 2 otterremo una mano che saluta. 
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PER SAPERNE DI PIU 




LE DECORAZIONI 
E.C.F. RESIDENTI 


di BRUNO PARBONI ARQUATI 


el numero di luglio/agosto 1988 di questa stessa Ri¬ 
vista l'Amico Enrico Fabrizi vi ha illustrato le proprie¬ 
tà delle decorazioni E.C.F. (Extended Colour Fili) im¬ 
plementate nel Sistema Operativo e richiamabili con 
il noto comando GCOL 1,0. 

All'articolo era anche allegato il listato di un programma che dava 
modo di variare a proprio piacimento, modificando opportuna¬ 
mente gli otto parametri associati ai comandi di definizione di dette 

decorazioni (cioè da VDU 23,2.a VDU 23,5,.), l’effetto con 

essi ottenibile. 

Qualora non sia necessario ottenere degli specifici effetti grafici, 
quali ottenibili mediante la opportuna ridefinizione dei sopracitati 


parametri, ma si desideri unicamente utilizzare per il riempimento di 
una delle varie figure ottenibili con i comandi PLOT una decorazio¬ 
ne meno banale del solito, esiste una vasta e generalmente inso¬ 
spettata, disponibilità di decorazioni belle e pronte senza alcuna 
necessità di utilizzare i sopra richiamati comandi VDU 23,2,. 
Basterà infatti assegnare al comando GCOL dei valori intermedi, 
dal GCOL 4,0 in poi e fino a GCOL 128,0, per ottenere degli effetti a 
dir poco sorprendenti. 

Il breve programma riportato in calce a queste brevi note vi darà la 
possibilità di individuare quale decorazione sia la più consona alle 
vostre esigenze e di introdurne il relativo numero I (che è visualizza¬ 
to accanto ad ogni decorazione) nel comando GCOL. 



10 

20 

30 

40: 

30 

60 

70 

50 

90 

100 

110 

120 

130 

140 

150 

160; 

170 

150 

190 

200 

210 

220 

230 

240 

250 

260 

270 

250; 

290 

300; 

310 

320 

330 

340 

350 

360 

370 

350 


REM ************************** 

REM * "DEMO_GCOL" — DIMOSTRATIVG COMBINAZIONI E.C.F. * 

REM ************************** 

FCR M=0 TO 2:MODE M 
FOR 1—4 TO 125 3TEF 2 

IF M\ >2 THEN J —640— (M+l ) *200: DI— "DECORAIIONE CON GCOL " ELSE J—296; 

DI-"GCOL = " 

CLG:MGVE200,1000:DRAM1060,1000:BRANI050,600:DRAN200,600:DRAN200,1000 
GCOL1,0:IF M</2 THEN MOVE225,994:FLGT97,Só4 f —334 ELSE MOVE216,990: 
FL0T97,345,-376 

MOVE200,500:DRAN1030,500:DRAN1050,100:DRAN200 f 100:DEAN2SG,500 
GCOL(I + l) ,0:IF M<>2 THEN MGVE203,494:FLGT97,364,—334 
ELSE MGVE216,490:FL0T97,343 , —373 

GCOL0,3 : VDLI5 : MOVE J,533:FRINT DI} STRII j " , 3" ; MOVE J,SG: 

FRINT DI; STRI (I-*-i> ; ",3" 

IF Mn >2 THEN Al—"FREMI UN TASTO FER CONTINUARE":HGVEÓ00—(M+l)*233,43 
ELSE Al—"FREMI UN TASTO": MOVE192 y 40 
FRINTAI:Z-GET s VDU4 
NEXT:NEXT 

Z—INKEY(200) 

FOR M—0 TO 2:MODE Ms1—2 

FOR K—1320 TG 6G 3TEF —64 

VDU5: MG VE363—M * 32 , Ks FRINT3TRI I : VDU4 

GCOL 1,0: MGVE500, K.: FL0T97,533 , —52 

MOVE500,K—53:FL0T2,500,3 

GC0L3,3 : I — I -**2 

IF 1—32 OR 1—62 OR 1—92 OR 1—122 THEN FRGCT:Z—GET:CLS:K—1323 

NEXTsFROCT 

Z-GET:NEXT 

Z—INKEY i233) : CHAIN" -I. Mei iu" 

END 

DEFFROCT 

A4?—"COMBINAI IGNI DELLE DECORAIIGNI":L—LENAI 
FOR J—1 TO L: FRINTTAB (G, J ) MIDI \ A-4, J , 1 ) ; : NEXT 
Al—"* VISUALIZZAZIONE IN MODE "-i-3TRITI-»-" *” : L—LENAI 
FOR J—1 TO L: FRI NTT AB (2, J ) MIDI ( A-l, J , 1 ) ; : NEXT 

IF M<2 THEN A^—"FREMI UN TASTO FER CONTINUARE" ELSE Al—"FREMI UN TASTO 

L=LENA!:FuR J—1 TO L;FRINTTAB(3+J,0/MIDI(Al,J,1); :NEXT 

ENDFROC 
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di PAOLO FREQUENTI 


Come far scorrere sul video delle scritte formate da caratteri gran¬ 
di a piacere 



uesta routine stampa un carattere che, uscendo dal 
lato destro dello schermo, scorre verso sinistra. La 
larghezza del carattere è variabile a piacere. I para¬ 
metri necessari alla routine sono: 

POKE &H9FD6.CAR 
POKE &H9FD8.DIM 
POKE &HOFDB.POS 


dove CAR è il codice ASCII del carattere da stampare, DIM è la lar¬ 
ghezza del carattere e POS è la riga su cui vogliamo visualizzare il 
carattere (da 0 a 15). Per stabilire la larghezza del carattere basterà 
moltiplicare per 8 il valore di DIM, mentre assegnando a DIM il valo¬ 
re 0 si otterrà un carattere largo 256 colonne. Per lanciare la routi¬ 
ne sarà sufficiente l'istruzione EXEC &FI9F00. La routine occupa il 
segmento di memoria &FH9F00-&H9FFF. 


10 P$-”Prova della routine BIGS ” 
10000 P0KE&H9FDS,2:POKE&H9FBB,4 
10010 FOR A=1 TO LEN(P$) 

10020 POKE &H9FD6 , ASC Ut I D$(F$,A,1)) 
10030 EXEC&H9F00 
10040 NEXTA 
10050 GOTO 10010 


1 * BIOS 

10 CLS : CLEAR,&H9EFF 

20 ST=&H9F00:LIN=100 

21 CK=0 

22 READ AS,A: IF A$="*" THEN 8 
0 

24 FOR B=1 TO LEN(.A$>-1 STEP 

2 

26 L=VAL<”&H”+MID4 (AS, B, 2) ) : P 
OKEST,L 
28 CK=CK+L 
30 ST=ST+1 
40 NEXT B 

42 IF CKO A THEN PRINT"ERROR 
E NELLA LINEA "LIN:END 
44 LOCATEO,0,0 :PRI NT”LINEA ”L 
IN" OK ” 

50 LIN=LIN+2:GOTO 21 
80 CLS:PRINT"SALVATAGGIO ?" 

82 A$=INPUT$(1):IF A$="S” OR 
A$="s” THEN SAVEM"BIGS",&H9F0 
0,&H9FFF,&H9000 
84 END 

100 DATAB6A7C084DFB7A7C0,1438 
102 DATA1700B4B69FD68020, 0918 
104 DATAC6083DC3F1CA1F01,0937 
106 DATA8680B79FD7C60834,1077 
108 DATA0434101700871OBE, 0436 
110 DATA9FD9C6083404A684,0936 
112 DATAB49FD7B19FD72722,1178 
114 DATA8D3A31A90140301F,0561 
116 DATA35045A5D26E63510,0577 
118 DATA3504749FD75A5D26,0768 
120 DATACEB6A7C08A20B7A7,1267 
122 DATAC03934203410C608,0607 
124 DATA8E9FF0A680A72031,1083 
126 DATAA8285A5D26F53510, 0743 
128 DATA352020C63420C608,0605 
130 DATA6F2031A8285A5D26,0621 
132 DATAF735203934103404 , 0513 
134 DATAC627BE9FDC341034,0926 
136 DATA04C640A601A7 0030, 0648 
138 DATA88285A5D26F53504,0699 
140 DATA351030015A5D26E5,0568 
142 DATA3504351039341034,0303 
144 DATA04F69FD88DCE5A5D,1155 
146 DATA26FA3504351039B6, 0653 
148 DATA9FDB81102A0FBB9F,0926 
150 DATADBC6A03DFD9FDCC3,1465 
152 DATA0027FD9FD9396D00,0834 
154 DATA0100270000000000,0040 
156 DATA0000000000000000, 0000 
158 DATAOOOOOOOOOOOOOOOO, 0000 
160 DATAFFFFFFFFFFFFFFFF, 2040 
162 DATAOOOOOOOOOOOOOOOO, 0000 
164 DATA *,0 
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PER SAPERNE DI PIÙ 


Locazioni 

Grafiche 


di PAOLO FREQUENTI 


Intervenendo su queste locazioni è possibile ottenere variazioni 
di colore e di grafica sullo schermo, insolite e spettacolari. Alte - 
rondo il posizionamento della memoria grafica si possono realiz¬ 
zare interessanti animazioni 


I PC 128 dispone, come molti sapranno, di molteplici 
modalità grafiche che vengono normalmente sele¬ 
zionate mediante il comando BASIC CONSOLE. Inol¬ 
tre, la memoria grafica è realizzata mediante due 
banchi da 8K ciascuno, posti in parallelo. La loca¬ 
zione che analizzeremo permette di modificare il colore del bordo e 
di spostare la posizione della memoria grafica. La prima possibilità 
permette la variazione del colore del bordo, che però viene effettua¬ 
ta con una velocità elevatissima. Questo fatto permette la realizza¬ 
zione di particolari routine in linguaggio macchina che, cambian¬ 
do velocemente il colore di bordo, creano effetti grafici molto spet¬ 
tacolari nonché insoliti. Per variare il colore del bordo è sufficiente 
modificare i primi 4 bit della locazione &HA7DD con il codice del 
colore desiderato (0-15). In Basic ciò si ottiene molto semplice- 
mente con: 

POKE &HA7DD,16 +COLORE BORDO 

Gli ultimi quattro bit della routine permettono di spostare l’inizio 
della memoria grafica. I valori possibili sono: 

valore effetto 

5-7 sposta la memoria grafica a &H2000 
9-11 sposta la memoria grafica a &H6000 del banco 1 
13-15 sposta la memoria grafica a &H6000 del banco 2 
1-3 ristabilisce le condizioni iniziali 

I valori pari (2-4-6 etc.) devono essere assolutamente evitati. Per ot¬ 
tenere la viariazione del contenuto di questa locazione in BASIC si 
deve impartire: 

POKE &HA7DD,(VALORE x 16) + COLORE BORDO 


Quando si varia la posizione della memoria grafica cambia anche 
la costituzione delle due memorie (grafica e del colore). Infatti, 
mentre prima queste due memorie erano sovrapposte e venivano 
selezionate alternativamente, adesso si trovano una dietro l'altra, e 
più esattamente i primi 8K sono del colore e i secondi 8K riguarda¬ 
no i codici. Quindi, spostando la memoria a &H2000, otteniamo che 
la zona di memoria da &H2000 a 7H3FFF contiene i codici dei colo¬ 
ri zoan di memoria da &H4000 a &H5FFF contiene i codici grafici. 
Così come selezionando la memoria da &H6000, la zona &H6000- 
&H7FFF conterrà i colori e la zona &H2000-&H5FFF è normalmen¬ 
te occupata dalle locazioni di sistema e la zona &H6000-&H9FFF 
del banco 1 contiene il programma BASIC. L’unica possibilità si ha 
se il programma è sufficientemente corto da non uscire dal banco 1 
in modo da lasciare libero il banco 2, che può essere utilizzato co¬ 
me seconda memoria grafica. Una delle più immediate applicazioni 
dello spostamento della memoria grafica consiste nella realizzazio¬ 
ne di animazioni molto particolari, realizzate nel seguente modo: si 
disegna il primo fotogramma nella normale memoria grafica, che 
viene immeidatamente visualizzato. Successivamente si disegna il 
secondo fotogramma nella seconda memoria grafica e si sposta l’i¬ 
nizio della memoria per disegnarvi il terzo fotogramma e quindi ri¬ 
spostare l'inizio della memoria grafica, e così di seguito per ogni fo¬ 
togramma. 

Il vantaggio di questo sistema è nel fatto che la commutazione av¬ 
viene ad una velocità molto elevata. Questa è una delle molteplici 
applicazioni che possono essere fatte nell’uso di più memorie grafi¬ 
che, in special modo se si lavora esclusivamente in linguaggio 
macchina, in quanto è possibile disporre di ben 3 memorie grafiche 
supplementari. Comunque, per saggiare l’effetto di quanto detto, 
provate a digitare: POKE&H7DD, &H50. Innanzitutto noterete che il 
bordo diventerà nero (il valore &H50 in binario è 01010000, e quindi 
i primi 4 bit danno il valore 0 corrispondente al codice del colore ne¬ 
ro), e lo schermo si riempirà di strisce colorate apparentemente 
senza senso. In realtà state visualizzando la zona di memoria da 
&H2000 a &H5FFF, che contiene le più importanti locazioni di siste¬ 
ma. Noterete infatti che usando la tastiera alcune delle misteriose 
striscette colorate cambiano forma e colore e. premendo il tasto 
ENTER, noterete sullo schermo la breve comparsa di alcune loca¬ 
zioni nuove. Queste corrispondono ai caratteri della linea appena 
digitata. Per ritornare alla situazione iniziale bisogna digitare, sen¬ 
za poter riscontare sullo schermo ciò che state scrivendo: POKE 
&HA7DD,&H10. Precedentemente avevamo detto che i valori pari 
dei bit 4,5,6 e 7 della locazione &HA7DD dovevano essere assoluta- 
mente evitati. Questo perché simili valori provocano il restart se ci si 
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trova in BASIC 128. Al contrario, se ci si trova in BASIC 1, il restart 
viene provocato dai valori dispari. È quindi ovvio che il bit 4 della lo¬ 
cazione &HA7DD commuta dei banchi di ROM. Prima di continuare 
nella descrizione è necessario fare alcune puntualizzazioni. La me¬ 
moria del PC 128 contiene 3 distinti programmi. Il primo è quello 
che permette la visualzzazione del menu principale, la variazione di 
tutti i parametri e la selezione di uno dei due BASIC. Gli altri due 
programi sono gli interpreti BASIC. Il programma del menu occupa 
16K di memoria, come l’interprete del BASICI. L’interprete del BA¬ 
SIC 128 occupa invece 32K. Quando il bit 4 della locazione 


&HA7DD è settato (cioè posto ad 1) v iene selezionata la ROM del 
BASIC 128. Questa ROM ha una estensione da &HB000 a &HEFFF, 
ovvero 16K. Come è possibile che in 16K di memoria possano esse¬ 
re contenuti 32K di dati? Con la stessa tecnica usata per la memo¬ 
ria grafica e cioè con due banchi in parallelo da 16K ciascuno, la 
cui selezione questa volta viene effettuata dal bit 5 della locazione 
&HA7CO. 

Quando invece il bit 4 di &HA7DD è posto a 0 vengono selezionati 
contemporaneamente il BASIC 1 e il programma di presentazione 
posti in parallelo, la cui selezione può essere effettuata come visto 
prima. Il reset del sistema ottenuto immettendo valori pari nei bit 
4,5,6,7 della locazione &FIA7DD in BASIC 128, era dovuto al fatto 
che, durante l’esecuzione dell’interprete, dell’altro BASIC (che non 
è affatto simile a quello del BASIC 128), con la conseguente reazio¬ 
ne di restart. Segnalo il fatto che i binari pari hanno sempre il primo 
bit nullo (in questo caso si tratta dei bit 4, responsabile della com¬ 
mutazione ROM). 


MEMOR Y INPUT 



di FRANCESCO DURANTI 


Vi presentiamo un breve programma per scrivere dei valori esa- 


F5 (SAVE): salva il contenuto della memoria con gli indirizzi specifi¬ 
cati 

F6 (ENDINP): per tornare al menu principale 
F7 (OUIT): serve per uscire dal programma. 


decimali o codici ASCII in memoria. 


uesto breve programma serve semplicemente a scri¬ 
vere dei valori decimali, esadecimali o codici di ca¬ 
ratteri ASCII in memoria. 

Il menu principale è composto da 3 opzioni: 

1) input decimale: permette di usare come input nu¬ 
meri decimali 

2) input esadecimale: permette di usare numeri esadecimali 

3) input ASCII: permette l’uso di caratteri ASCII successivamente 
convertiti nei relativi codici dal programma. 

Dopo aver scelto il tipo di input dovrete immettere l’indirizzo di me¬ 
moria da cui volete cominciare a scrivere i codici. 

A questo punto potrete digitate i codici nel formato scelto in prece¬ 
denza (gli esadecimali non hanno bisogno del prefisso ‘‘&H’’) oltre 
ad immettere dei comandi che vi permetteranno di salvare la me¬ 
moria o di posizionarvi su di essa attraverso i tasti funzione. 


COMANDI 

FI ( + 1): serve per posizionarsi sul prossimo indirizzo di memoria 
F2 (-1): serve per posizionarsi sul precedente indirizzo di memoria 
F3 ( + 8) incrementa di 8 il contatore della memoria 
F4 (-8) decrementa di 8 il contatore della memoria 


Lo schermo è così suddiviso: 

A partire dal primo carattere della riga vi sono: 

1) Indirizzo decimale. 

2) Indirizzo esadecimale. 

3) Contenuto della memoria in binario. 

4) Contenuto della memoria in decimale. 

5) Contenuto della memoria in esadecimale. 

6) Input corrente. 

Credo proprio che il programma, data la sua brevità e semplicità, 
non ha bisogno di ulteriori commenti. 


10 SCREENO: COLOR12,1,1:CLS:WIDTH 40:CLEA 
R500:Q$=CHR$(13):KEY 1,”-l”+Q$:KEY2," + 1” 
+Q$:KEY3, M -8"+Q$:KEY4,”+8”+Q$:KEY5,”SAVE 
"+Q$:KEY6,”ENDINP”+Q$:KEY7, ” QU IT”+Q$ : FOR 
T=8T010 : KEY T, ,,M : NEXTT 
20 ON STOP GOSUB 40:STOP ON 
30 ON ERROR GOTO 570 

4 0 CLS: PRINT” - MEMORY ED IT & SA 

VE -” 

50 PRINT” di FRANCESCO DURANTI 

per LIST” 

60 PRINT:FRINT” 1 -> Input decimale” 

70 PRINT:PRINT” 2 -> Input esadecimale 

fi 


m 
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PER SAPERNE DI PIU 


80 PRINT:PRINT” 3 -> Input ascii” 


380 GOTO 200 

90 PRINT 


390 IF PA<32768! THEN PA=65535! 

100 PRINT”Cosa scegli ?” :AS =INPUTS(1> 


400 GOTO 200 

110 A=VAL(AS) 


410 CLS 

120 IF A<1 OR A>5 THEN 100 


420 PRI NT”Vuoi salvare i dati?”:AS=INPUT 

130 IN=A 


Svi):IF AS=”S”OR AS=”s”THEN430 ELSE GOTO 

140 PRINT:PRINT”Indirizzo di partenzaCEs 


200 

adecima le)”; 


430 INPUT”Inizio a ”; INS: INPUT”Fino a 

150 LINE INPUT AS 


FIS:INPUT”Start a ”;STS:IF STS=””THENSTS 

160 A=VAL(”&H”+AS):IF SGN(A)=-1 THEN A=6 


= I NS 

5536!+A 


440 IFRIGHTS(INS,1)=”H”THENF=1ELSEF=2 

170 IF A<32768! OR A>65535! THEN 140 


450 IFF=1THENIN=VAL(”&H” + I NS ) : FI=VAL(”&H 

180 PA=A:B$=”00000000” 


”+FIS) : ST=VAL (” Si H” +STS ) ELSEI FF=2THENI N=V 

190 CLS:PRINT” INDIRIZZI VALORI IN MEM” 


AL(INS*: FI=VAL(FIS):ST=VAL(STS) 

:PRINT” DEC HEX BIN DEC HEX INP 


460 INPUT ”Nome file(Max.8 caratt.)”;NOS 

UT” 


:IFLEN(NOS)>8THEN460 

200 CO=PEEK(PA):IF CSRLIN>20 THEN 190 


470 INPUT”Estenzione(Max.3 caratt.)”;SUS 

210 PRINT PA;TAB(7);HEXS(PA);TAB(12);RIG 


:IF LEN(SUS)>3THEN470 

HTS(BS+BINS(CO),8);TAB(20); CO;TAB(25>; HE 


480 IF NOS=””THENNOS=”prog” 

XS(CO);TAB(28); :Y=CSRLIN:X=POS(N) 


490 IF SUS=””THENNAS=NO$+”.BIN” ELSE NAS 

220 LOCATE X+2,Y:LINE INPUT AS 


=NOS+”.”+SUS 

230 IF AS=””THEN 200 


500 PRINT”Premi un tasto per cominciare” 

240 IF AS=”SAVE”THEN 420 


:AS=INPUTS(1) 

250 IF AS=”ENDINP”THEN RUN 


510 BSAVE NAS,IN,FI,ST 

260 IF AS=”QUIT”THEN 550 


520 PRINT”Premi *C' per continuare input 

270 IF AS=”+1”THEN 360 


,*Q' per uscire ed ’S' per un'altro inp 

280 IF AS=”-1”THEN PA=PA-l:GOTO 390 


ut. 

290 IF AS=”+8”THEN PA=FA+8:GOTO 370 


530 AS=INPUTS(1) 

300 IF AS=”-8”THEN PA=PA-8:GOTO 390 


540 IF AS=”C”ORAS=”c”THEN200ELSEIFA$=”Q” 

310 IF I N=2 THEN A$=”&h”+AS 


0RAS=”q”THEN560ELSEIFAS=”S”ORAS=”s”THENR 

320 IF IN<>5 THEN A=VAL(AS) ELSE A=0 


UNELSE530 

330 IF IN=3 AND ASO”” THEN IF ASC(AS>>3 


550 PRINT”SEI SICURO ? AS=INPUTS(1): IF 

1 THEN A=ASC(AS) 


AS=”S”ORAS=”s”THEN560 ELSE 200 

340 IF I N=3 AND ASO”” THEN IF ASC(AS)=1 


560 SCREENO:DEFUSR=&H3E:A=USR(0):KEYON:N 

THEN A=ABS(64-ASC(RIGHTS( AS,1))) 


EV 

350 IF A>255 OR A<0 THEN 200 ELSE POKE P 


570 IF ERR=6 THEN RÉSUMÉ 200 

A, A 


580 PRINT”ERROR ”;ERR;” IN LINE ”;ERL:FO 

360 PA=PA+1 

370 IF PA>65535! THEN PA=32768! 


RI=1T04000:NEXT:RÉSUMÉ NEXT 


LASER 


di MAURO MARINILLI 

■I eco una piccola chicca per gli utenti MSX 1 e 2. Tutti 
| voi conoscete le potenzialità sonore del PSG, anche 

se non sempre in Basic è possibile sfruttarle al mas- 
simo a causa della lentezza di questo linguaggio. 
Con questa manciata di numeri potrete, tramite 
USR, richiamare il classico "effetto laser", che ben si addice ai vo¬ 
stri giochi di azione e ai vostri jingles. 

Il tutto con la velocità e l’effetto sonoro di un loop direttamente ope¬ 
rante sul PSG. 


1OOOO FGRI=49152 ! TQ 49217 ! : READ 
Us POKEI,U sNE X T 2 DEFUSR=&HCOOO 2 'LA 
SER IN LM SUL CANALE "A" DEL PSG 
60000 DATA62,1,30,O,205,147,0,62 
,8,30,15,205,147,0,28,123s '49168 
60002 DATA254,0,40,23,62,O,205,1 
47,0,0,205,147,0,0,205,147 2 '4918 


60004 DATAO,0,205,147,0,0,205,14 
7,0,24,227,30,22,123,254,0 2 '4920 
0 

60006 DATA200,62,8,205,147,0,62, 
1,205,147,0,29,205,147,0,0,24,23 
5 
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MODIFICHIAMO 
Il TEIEBEAM 


di GIAN PIERO ROSI 


oltissimi lettori ci hanno richiesto di modificare il 
programma TELEBEAM, pubblicato sul numero 3/ 
1988, in modo da poterlo utilizzare con l’ausilio della 
tastiera anziché del joystick. 

Sostituendo alle linee 860-910 quelle che vi propo¬ 
niamo in questo articolo, potrete utilizzare i tasti di movimento 


cursore al posto del joystick, e il tasto di RETURN in sostituzione del 
pulsante di sparo. 

860 GETR$:IFR$ = ” "THEN860 

870 Z = ASC(R$):IFZ = 13THENRETURN 
880 IFZ= 145THENY% =Y%-1:IFY%<50TF!ENY% = 50 
890 IFZ = 29THENX% =X% +1 :IFX%»319THENX% = 319 
900 IFZ = 17THENY% = Y% + 1:IFY%>180THENY% = 180 
910 IFZ = 157THENX% = X%-1 :IFX%<24THENX% = 24 



ROUTINE MUSICALE 


di GIAN PIERO ROSI 

uesta breve routine utilizza il famoso SID del Com¬ 
modore 64, per ottenere un piacevolissimo effetto 
musicale a due voci. 

I DATA corrispondono alternativamente al valore 
della nota da suonare e alla sua durata, e vengono 
inseriti nelle variabili A e B. 

Provate quindi ad utilizzare questo procedimento per eseguire le 
vostre personali composizioni. 


100 REM *** ROUTINE MUSICALE *** 

110 F0RJ=1T0118 : READK: CS =CS+K :NEXT 
120 REST0RE:IFCSo3271THENTHENPRINP’ERR0 
RE”:STOP 

130 R=54272:F0RM=RT0R+23:P0KEM,0 :NEXT 
140 POKER+5,10:POKER+12,10:P0KEM,15 


150 F0RJ=1T059:READA,B 
160 POKER+1,A*2 : POKER+8,A:POKER+4,33 
170 P0KER+11,17:F0RS=1T0B*149 :NEXT 
180 POKER+4,32 :P0KER+11,16 :NEXT 
190 REST0RE:GOTO150 

200 DATA 33,3,44,4,42,2,44,4,56,3,50,4 
210 DATA 44,2,50,4,56,2,50,2,44,4,44,2 
220 DATA 56,3,67,3,75,6,75,3,67,4,56,2 
230 DATA 56,4,44,3,50,4,44,2,50,4,56,2 
240 DATA 50,2,44,4,37,2,37,3,33,2,44,6 
250 DATA 75,3,67,4,56,2,56,4,44,3,50,4 
260 DATA 44,2,50,4,75,3,67,4,56,2,56,3 
270 DATA 67,3,75,6,75,3,67,4,56,2,56,4 
280 DATA 44,2,50,3,44,2,50,4,56,2,50,2 
290 DATA 44,4,37,2,37,4,33,3,44,9 
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PER SAPERNE DI PIÙ 


SIMULAZIONE 
JOYSTICK CON LA 
TASTIERA DEL C-64 


di WILLIAM PATTI 


È possibile simulare il joystick in porta 2 con la tastiera del Com¬ 
modore 64? 


eggendo qua e là gli inserti di riviste di informatica 
che trattano anche altri computers nelle configura¬ 
zioni hardware, ho appreso che, con il computer 
AMIGA, premendo determinati tasti è possibile simu¬ 
lare il joystick. 

Facendo delle prove col C64 ho constatato che anche con esso è 
possibile, ma non sempre funziona però, poiché sicuramente alcu¬ 
ni videogames o programmi in L/M disabilitano la tastiera impe¬ 
dendo sia la simulazione, sia la disabilitazione del programma in 
memoria. 

È chiaro che il joystick, per i videogames è più maneggevole della 
tastiera, e senza di esso certi programmi non si potrebbero usare, 
specialmente se richiedono prontezza di riflessi, e quindi è indi¬ 
spensabile inserire il joystick nella relativa porta 1 o 2 a seconda 
della richiesta del programma. 

Il misterioso C.I.A. (da non confondere con la nota Agenzia Investi¬ 
gativa Americana), il Complex Interface Adapter, gestisce oltre le 
operazioni di I/O, le porte per i joystick, paddles, penna ottica, regi¬ 
stratore, drive, user port ed anche la tastiera. 

Esso è regolato dal timer 1 per le operazioni di I/O e, ad ogni ses¬ 
santesimo di secondo salta a IRQ (Interrupt ReQuest) per la norma¬ 
le gestione delle interruzioni; e premendo contemporaneamente 
determinati tasti si “inganna" il Sistema Operativo, facendogli cre¬ 
dere che sia inserito il joystick in porta 2. 


I TASTI MAGICI SONO 

BARRA SPAZIATRICE + TASTO M = FIRE (fuoco) 

BARRA SPAZIATRICE + TASTO B = LEVA A SINISTRA 
BARRA SPAZIATRICE + TASTO C = LEVA DESTRA 
BARRA SPAZIATRICE + TASTO FI = LEVA IN ALTO 
BARRA SPAZIATRICE + TASTO Z = LEVA BASSO 

È stato testato con un DataBase professionale ad icone e con alcu¬ 
ni videogames, funziona perfettamente, mentre con il Package 
“GEOS” il trucchetto non funziona. 

Potete provare con il programma “DIRECTORY JOY” pubblicato 
su LIST n.7/8 - LUGLIO/AGOSTO a pag. 84, con esso funziona 
egregiamente. 


Inviando 10 prove di acquisto* 
della rivista LIST’89 



riceverai in regalo 
l’indispensabile 
raccoglitore 
della tua biblioteca 
software LIST. 


Ritaglia e spedisci a fine anno le 10 prove 
di acquisto con relativo nome, cognome 
e indirizzo a: EDICOMP s.r.L Via Flavio Stilicone 111 
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Il primo libro 
tutto italiano sul “LOCO" 


Paolo Ciancarìni 



Il linguaggio più facile 
per dialogare con il Computer 

EDICOMP a 





Il LOCO è il linguaggio che si sta 
affermando, in Italia e all'estero, come 
il principale strumento per usare 
attivamente il computer nella scuola. 

Il LOGO serve per imparare a 
programmare giocando con, ma anche 
SENZA, il computer. 

Caratteristica di questo libro è il gran 
numero di esercizi-gioco contenuti 
in ciascun capitolo. 

Il volume è l'unico “italiano” per il LOCO 
del Commodore 64, e grazie al dizionario 
finale può essere usato anche da utenti 
Apple, IBM, Texas. 



NOVITÀ 

Il linguaggio LOCO e utilità COMMODORE 
su floppy da 5” % 

COMPRESO NEL LIBRO 


l pacchetti applicativi completi 
sono così composti: 

m libro “io parlo LOCO” con incluso il lin¬ 
guaggio LOCO e utilità COMMODORE 
(L. 24.500) 

m libro “io parlo LOCO” con linguag¬ 



gio LOCO e utilità COMMODORE + 
procedura LOGO TRIDIMENSIONALE 
(L. 39.000) 

o procedure con esempi per lavorare in 
LOCO TRIDIMENSIONALE (L. 25.000) 


N.B. I prezzi sono comprensivi di IVA e spese postali 



Indispensabile per programmare 
in «L 0 G 0» a un prezzo che è... 

QUASI UN DONO!!! 


COME RICEVERLO 

□ Ho inviato assegno bancario non tra¬ 
sferibile. di L.. 

intestato a EDICOMP Srl 

□ Ho versato sul conto corrente postale 
n. 72609001 intestato a LIST - Pro¬ 
grammi per il tuo home computer - 
Via Flavio Stilicone 111 - 00175 Roma, 
di cui allego fotocopia. 

□ Ho effettuato vaglia postale intestato 
a EDICOMP Srl - Via Flavio Stilicone 
111 - 00175 Roma 

Compilare e spedire in busta chiusa a. 

EDICOMP Srl - via Flavio Stilicone 111 -00175 Roma 


NOME . 

COGNOME 


VIA . 

CAP.CITTÀ . 

PROV.Tel. 
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M-ROUTINES 


di BRUNO 
PARBONI ARCUATI 


Nel listato che qui allegato vi pro¬ 
pongo ho incluso alcune routines, 
sotto forma di procedure pre-defini¬ 
te, di utilità generale, che potranno 
quindi essere utilizzate quale base 
fondamentale in un qualsiasi vostro 
programma di carattere generico 

MODALITÀ DI UTILIZZAZIONE DEL LISTATO 

igitate diligentemente il listato e, se lo riterrete oppor¬ 
tuno, omettete pure le varie “REM” esplicative (ma in 
questo caso sarà consigliabile rinumerarlo al termi¬ 
ne della digitazione mediante un comando diretto 
RENUMBER 10000, in modo che siano evitate possi¬ 
bili interferenze con altri listati), ed al termine della vostra fatica sal¬ 
vatelo sotto forma di file ASCII, utilizzando cioè la serie dei comandi 
diretti sotto riportati, digitandoli uno di seguito all’altro: 
*SPOOL“M—Routines" (viene aperto un file di nome “M—Routi¬ 
nes” nel quale verrà inserito tutto quanto visualizzato sullo scher¬ 
mo o digitato direttamente) 

LIST (tutte le varie linee del vostro listato saranno ora mostrate sul¬ 
lo schermo e ; nello stesso tempo, memorizzate nel file che avete 
aperto) 

*SPOOL (il file “M—Routines” viene chiuso, ed è pronto per essere 



Olivetti PRODEST 

PC 128s 



utilizzato) Se ora tentate di caricare il listato come d’abitudine, cioè 
con un comando LOAD “M—Routines" oppure CHAIN "M—Routi¬ 
nes” non otterrete altro che un messaggio “Bad Program”: infatti il 
vostro file non può essere caricato normalmente ma potrà solo es¬ 
sere "mergeato” (come in altri elaboratori) con il comando: 
*EXEC "M—Routines” 

Non vi preoccupate minimamente se vedrete comparire sullo 
schermo dei messaggi strani, come "Syntax error" e simili: se, al 
termine del caricamento darete un comando LIST vi accorgerete 
che il vostro listato è stato perfettamente caricato ed è pronto ad 
essere utilizzato. A questo punto potrete utilizzare il listato diligen¬ 
temente copiato e ricaricato in memoria nei due principali modi qui 
di seguito sono ipotizzati: 

1: come base di partenza di un nuovo programma che utilizzerà, in 
toto o solo parzialmente, le varie routines del listato, e che avrete 
cura di digitare dopo il caricamento dello stesso, con numeri di riga 
inferiori al 10000 iniziale: una volta terminato eliminate le righe su¬ 
perflue, rinumerate il tutto e salvate con un nome appropriato al 
programma digitato. 

2: per integrare un listato esistente mediante l'aggiunta delle nuove 
routines disponibili nel file “M—Routines": caricate per prima cosa 
il vostro programma con un LOAD “Nome—prog” e, dopo esservi 
accertati che non vi siano numeri di riga che possano interferire 
con quelli del listato da “mergeare”, date il comando *EXEC 
“M—Routines”. 

Una volta fusi i due listati potrete tanto eliminare le righe che non 
interessano, quanto aggiungerne altre di completamento: ultimata 
questa fase rinumerate opportunamente il tutto e poi salvate il vo- 
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PROGRAMMI 



stro nuovo programma che avrete così fabbricato. 


DESCRIZIONE DELLE VARIE ROUTINES 

Per la descrizione dettagliata delle varie routines verrà seguito il 
medesimo ordine adottato nel listato proposto, cioè: 

1: Ingrandimento dei caratteri con routine in BASIC. 

Questa routine, interamente in BASIC, consente di ottenere sullo 
schermo, in ognuno dei MODES grafici, delle scritte in doppia altez¬ 
za, simulando quanto è possibile ottenere nel MODE 135: per il cor¬ 
retto suo funzionamento occorre riservare nella memoria apposito 
spazio alle variabili ausiliarie utilizzate a tale scopo. Perciò è sem¬ 
pre necessario premettere al programma vero e proprio un dimen¬ 
sionamento DIM c% 9. Occorrerà inoltre, ad evitare una sovrappo¬ 
sizione parziale delle scritte, far si che la lunghezza del testo sia 
contenuto entro il numero dei caratteri disponibili nella riga di te¬ 
sto. Per ottenere il desiderato posizionamento del testo occorre 
usare un’espressione del tipo: 

PRINTTAB(x%,y%);:PROCd("Testo della scritta") 

Il testo verrà così esattamente posizionato con l’angolo superiore 
sinistro della sua lettera iniziale ingrandita nella casella avente le 
coordinate x% ed y%. 

2: Finestre varie e definizione lunghezza pagina. 

Si ha spesso la necessità di definire una finestra che parzializzi lo 
schermo in modo da poter mantenere inalterata, ad esempio, l'inte¬ 
stazione generale, od il titolo del programma in esecuzione (vedi al 
successivo punto 8): le routines incluse nel listato provvedono a ta¬ 
le bisogna definendo inoltre le variabili permanenti L% e R% utiliz¬ 
zate per il posizionamento dei messaggi di pausa (vedi punto 4). 
Èù ovvio che i valori adottati nell’esempio del listato per il comando 
VDU 28 sono stati fissati a puro titolo di esempio e per una pagina 
in MODE 128: pertanto essi dovranno essere variati in funzione sia 
del MODE in uso che delle esigenze del programma. 

3: Procedura inversione colori e generazione segnale sonoro. 

Èù noto che per ottenere delle scritte a colori invertiti, ad esempio in 
nero su sfondo bianco se vi trovate nel MODE 128 normale, dovete 
inserire nella vostra riga di programma, prima della frase che desi¬ 
derate compaia invertita, l’uno o l'altro dei seguenti comandi: 
COLOUR 0:COLOUR 129 
VDU 17,0: VDU 17,129 

La chiamata PROCinv vi consentirà di ottenere il medesimo risulta¬ 
to: non dimenticate però di inserire il comando VDU 20 (che ripristi¬ 
na i colori di default del MODE in uso) al termine della frase (o frasi) 
che desiderate risultino in "reverse”. 

Ovviamente i codici numerici contenuti nei comandi sopra citati 
dovranno essere opportunamente modificati se il MODE in uso ri¬ 
sulterà diverso dal MODE 128 ipotizzato: vedere a tal proposito la 
tabella 2 riportata alla pag. 183 della Guida all’uso del Sistema. Di¬ 
scorso anàlogo potrà farsi anche relativamente ai segnali sonori, 
utili per richiamare l’attenzione: se non vi occorre una loro differen¬ 
ziazione a seconda dei casi utilizzate PROCsound e otterrete quan¬ 
to desiderato. La routine può essere modificata inserendo, in sosti¬ 
tuzione dei vari parametri numerici del comando SOUND, delle op¬ 
portune variabili che potrete opportunamente definire di volta in 
volta a seconda delle vostre esigenze. 


4: Routines di pausa fra le diverse schermate. 

Fra una pagina video e la successiva si utilizza spesso una apposi¬ 
ta scritta, che compare nell’ultima riga disponibile, per richiedere di 
premere un determinato tasto (in genere la barra spaziatrice) per 
poter continuare. 

Le due routines qui proposte vi consentiranno di ottenere quanto 
desiderato in due diversi modi: 

a) Tipo semplice. La scritta <PREMI LA BARRA SPAZIATRICE» com¬ 
parirà in "reverse” nella esatta posizione individuata dalle variabili 
R% e L%, che sono state definite mediante la scelta della pagina di 
testo (vedi punto 2) restando in attesa che premiate, come richie¬ 
sto, il tasto degli spazi: l’attivazione avviene con la chiamata PROC- 
pausa. 

b) Tipo lampeggiante. Con questa seconda procedura, la cui chia¬ 
mata è PROCpausa—I, la medesima scritta apparirà invece in for¬ 
ma lampeggiante (simulando quindi l’effetto ottenibile nel MODE 
130 adottando per i codici di colore valori superiori a 7 ed a 135 ri¬ 
spettivamente per il primo piano e lo sfondo) fino a quando non 
avrete premuto la barra degli spazi. 

5: Routine di presentazione scelta delle opzioni. 

Questa routine (di cui vengono presentate due possibili versioni) 
consente di far apparire, generalmente nella ultima linea della pa¬ 
gina in atto, la richiesta di una determinata scelta delle hopzioni di- 
- sponibili (che si tratti di stampare su carta il testo che seguirà, co¬ 
me in uno dei due esempi che sono stati riportati nel listato, o di al¬ 
tra qualsiasi alternativa non cambia molto) e da effettuare digitan¬ 
do una ben determinata lettera: l’adozione della funzione INSTR 
consente di rispondere digitando la lettera richiesta tanto in minu¬ 
scolo quanto in maiuscolo, mentre la pressione di qualsiasi altro 
tasto verrà del tutto ignorata. 

In funzione del tasto premuto viene inizializzata l’apposita variabi¬ 
le, da utilizzare opportunamente per selezionare l’una o l’altra delle 
opzioni disponibili. 

6: Routine di trasformazione dei numeri interi in stringhe. 

La presentazione, tanto sul monitor che nei prospetti stampati su 
carta, di numeri interi eccedenti le tre/quattro cifre significative non 
risulta di facile lettura: se questi numeri si potessero suddividere in 
gruppi di tre cifre alla volta, separandole con un punto (come lo si 
fa manualmente), allora si che che un milione non sarà più confon¬ 
dibile, a prima vista e senza mettersi a contare gli zeri, con un cen¬ 
tomila o con dieci milioni! 

Ebbene le procedure proposte hanno per fine proprio questo risul¬ 
tato: trasformare un numero intero in una stringa nella quale verrà 
effettuata, mediante un punto, la separazione delle migliaia e loro 
multipli: quindi un milione verrà scritto come siamo abituati a leg¬ 
gere, e cioè proprio 1.000.000 ! 

Le chiamate da effettuare sono: 

a) PROCstr(x%,y%,n%) (utilizzabile solo con il monitor) 

b) PROCprt(x%,n%) (utilizzabile solo con la stampante) 

Il numero n% verrà cosi stampato nel formato sopra citato e con la 
sua ultima cifra perfettamente allineata alla colonna x% (ed alla ri¬ 
ga y% se sul monitor), incolonnato esattamente come lo farebbe 
un diligente ragionieri 

7: Routine di scansione di una stringa alfabetica. Può avvenire che 
utilizzando i dati anagrafici contenuti in un Data-Base si renda op¬ 
portuno limitare la visualizzazione (o stampa) del dato al solo Co¬ 
gnome ed all'iniziale del Nome: ciò potrà essere ottenuto con la 
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10000REM **************** 
ÌOOIOREM * "M_Routines" * 

10020REM * Raccolta delle procedure ed * 
10030REM * Utilities varie, mergeabili * 
10040REM **************** 
10050: 

10060REM Bruno PARDONI ARQUATI - Roma 

10070REM - Agosto 1988 - 

10080: 

10090REM 1: Ingrandimento dei caratteri 
con routine in BASIC: per utilizzarla pr 
emettere dimensionamento DIM c7. 9 
10100: 

10110 DEFPROCd(x*) 

10120LQCAL x7. 

10130F0R x7.= l TO LENx* 

10140PR0Cdh(MID*(x*,x7.,1)) 

10150NEXT 
10160 ENDPROC 
10170: 

10180 DEFPROCdh(a*) 

10190?c7.=ASCa*: X7.=c*/.M0D256: Y7.=c7.DI V256 
10200AX-10:CALL&FFF1 

1 02 10VDU23,128, c7.? 1, c7.? 1, c7.?2, c7.?2 , c7. 73 , 
c7.?3,c7.?4,c7.?4,128,10,8,23, 128,c7.?5,c7.75 
, c7.?6 , c7.?6 , c7.?7, c7.?7, c7.?8, c7?8,128,11 
10220 ENDPROC 
10230: 

10240REM 2: Finestre varie e definizione 
lunghezza pagina 
10250: 

10260 DEFPROCwind_testo:VDU28,0,31,79,4: 
L7.=27 : R7.=28: CLS: ENDPROC 

10270 DEFPROCwind _1i s t a : VDU28 ,0,31,79,1: 
L7.=30: CLS: ENDPROC 
10280: 

10290REM 3: Procedura inversione colori 
(in MODE 128) e generazione segnale sono 
ro. 

10300: 

10310 DEFPROCinv:C0L0UR0: COLOUR1 29:ENDPR 
OC 

10320 DEFPROCsound:SOUND1,-8, 105,8:SOUND 

3,-7,80,6:ENDPROC 

10330: 

10340REM 4: Routine di pausa (PREMI LA B 
ARRA SPAZIATRICE) 

10350: 

10360REM a) Tipo semplice 
10370: 

10380 DEFPROCpausa:PROCinv:REPEAT: PRINTT 
AB (R7.,L7.) "< PREMI LA BARRA SPAZI ATRI CE >** ; 
:UNTIL GET=32 :VDU20:ENDPROC 
10390: 

10400REM a) Tipo lampeggiante 
10410: 

10420 DEFPROCpausa_l 

10430REPEAT : PR INTTAB ( R7., L7. ) "< PREM I LA BA 
RRA SPA2TATRI CE>" ; :Z=INKEY (50) :IF Z=32 
THEN ENDPROC 

10440PRINTTAB(R7.,L7.) ; STRING* (30, " ") ; : Z = 
INKEY (50) 

10450UNTIL Z=32 


10460 ENDPROC 
10470: 

10480REM 5: Routines di richiesta scelta 
opzioni varie 
10490: 

10500 DEFPROCstampa: PRINTTAB( 12,L7.) "Desi 
deri stampare i risultati del 1’elaborazi 
one? (S/N) " ; : REPEAT: stp*=GET*: stp7.= INSTR 
( "SsNn" ,stp*) : UNTILstp/C: PRINTstp*; : ENDPR 
OC 

10510: 

10520 DEFPROCfine 

10530PR0Csound:PROCsound:piede$="DESIDER 
I TERMINARE (T) OPPURE RICOMINCIARE (R) 

?" 

10540I7=39-LENpiede*/2:PROCinv:PROCpiede 
10550REPEAT:d*=GET*:d7.= INSTR("TtRr" ,d*) : 
UNT IL d7. 

10560IF d7.>2 TH£N VDU 20: ENDPROC ELSE PR 

OCsound:PROCsound: piede*=CHR*191+CHR*191 

+" * F I NE DEL PROGRAMMA 

* "+CHR*191+CHR*191 

1057017.= 18 : PROCp i ede : VDU20 : END 

10580 ENDPROC 

10590: 

10600 DEFPROCpiede:VDU28,0,31,79,31:CLS: 
PR I NTTAB ( 17. ) p i ede* ; : VDU26 : ENDPROC 
10610: 

10620REM 6: Routine di trasformazione de 
i numeri interi in stringhe con separazi 
one in migliaia e multipli. 

10630: 

10640REM a) Utilizzabile solo per visual 

izzazione sul monitor 

10650: 

10660 DEFPROCstr (x7.,y7.,n7.) : PROCmi 11 (n7.) : 
m7.=LENs*:PRINTTAB(x7.-m7.,y7.) ;s*; : ENDPROC 
10670: 

10680REM b) Utilizzabile solo con la sta 

mpante 

10690: 

10700 DEFPROCprt (x7.,n7.) : PROCmi 11 (n7.):m7.= 
LENs*: PR I NTTAB (x7.-m7.) ;s*; : ENDPROC 
10710: 

10720 DEFPROCmill (n7.) 

10730**=" " : nr*=STR*n7.: 117.=LENnr*: j j7.=2: I 
F 117.C4 THEN s$=nr$: ENDPROC ELSE ss7.=117. 
DIV3 

10740F0R i = l TO s*7.:m*=MID*(nr*, 11 7L-j j%, 
3) : j j7.=jj7.+3:s*=". "+m*+s*: NEXT: z%=l 1% MO 
D3: IF z7.< >0 THEN s*=LEFT* (nr* ,z7.) +s* 
10750IF ASCs*=46 THEN s*=RIGHT*(s*,LENs* 
-1) 

10760 ENDPROC 
10770: 

10780REM 7: Routine di scansione di una 
stringa alfabetica ed isolamento delle s 
ole maiuscole. 

10790: 

10800 DEFPROCspel1(N*) 

10810a*= " " : FOR j7.= l TO 20: IF ASC(MID*(N* 
,j7.,l)X=90 THEN a*-a*+MID* (N*, j7., 1 > ELS 


E a*=a*+". ": j7.=20 
10820 NEXT:ENDPROC 
10830: 

10840REM 8: Procedura intestazione pagin 
a di testo (in MODE 128) 

10850: 

10860 DEFPROCTitolo 

10870DIM c7. 9:VDU26:CLS:Titolo*=" 11 : Pro 
cedura intestazione pagina di testo (in 
MODE 128)" 

10880PRINTTAB(0,0)CHR*176;STRING*(78,CHR 
*166);CHR*177;CHR*169;TAB(79,1);CHR*169; 
CHR*169; 

10890PRINTTAB(79,2);CHR*169;CHR*178; STRI 
NG*(78,CHR*166);CHR*179; 

10900PRINTTAB(39-LENTitolo*/2,1);:PRQCd( 
Titolo*):PROCwind_testo 
10910 ENDPROC 
10920: 

10930REM 9: Tracciamento di caselle per 
reaiizzazione schemi organizzativi 
10940: 

10950 DEFPROCcasel la (x7.,y7.,T*) 

1096017.=LENT*+2 

10970PRI NTTAB ( x 7., y7. ) CHR* 176 ; STR I NG* ( 17., C 
HR* 166); CHR* 177; TAB ( x 7. , y7.+1 ) CHR* 169; SPC1 
7. ; CHR* 169 ; TAB ( x 7., y7.+2 > CHR* 178; STR ING* ( 1 7. 
, CHR* 166); CHR* 179 ; TAB ( x 7.+2, y7.+1 ) T* 
10980Z=INKEY(200):PROCmarca 
10990 ENDPROC 
11000: 

11010 DEFPROCmarca 
11020a*=" "+T*+" " : 1 en7.=LENa* 

11030F0R i7.=0 TO 6:IF i7. M0D2=0 THEN PRO 
Cinv:PRINTTAB(x7.+ l ,y7.+ l ) a* ELSE VDU20:PR 
I NTTAB ( x7.+1, y7.+1 ) STR I NG* ( 1 en7., " " ) 

11040Z=INKEY(40):NEXT:VDU20 

11050 ENDPROC 

11060: 

11070REM 10: Memoria residu 
a 

11080: 

11090 DEFPROCmem 

11100VDU28,0,31,24,30:VDU17,0:VDU17,129: 
5)7=0: CLS 

11U0PRINTTAB( 1,0) "Memoria occupata: ";L 
OMEM-PAGE;TAB(1,1)"Memoria residua : ";H 
IMEM-LOMEM; 

11120VDU26 : VDU20: 5>7.=&OA 

11130 ENDPROC 

11140: 

11150REM 11: Tempo accensio 
n e 
11160: 

11170 DEFPROCtempo 

11180VDU28,26,0,55,0: PROC i n v : a>7.=00 : CLS 
11190ore=TIME DIV360000:min=TIME DIV6000 
-ore*60:sec=TIME DIV100-(ore*3600+min*60 
):PRINT" ore "; ore;","; min;",";sec;" dal 
1’accensione"; 

1120037.=&0000090A : VDU26 : VDU20 : PRINT ' 
11210 ENDPROC A 


routine proposta (a condizione che il Cognome sia stato memoriz¬ 
zato in tutte lettere maiuscole ed il Nome in minuscole, salvo la pri¬ 
ma) che esamina la stringa di origine trasformandola in un’altra, di 
lunghezza massima prefissata, contenente però il Cognome segui¬ 
to dalla sola iniziale puntata del Nome. 

Supponiamo di avere il dato N$ = “CIARDELLI Paolo Maria”: con la 
chiamata PROCspell(N$) otterremo una nuova stringa in cui il no¬ 
minativo diverrà* “CIARDELLI P. M . 

8: Procedura intestazione pagina di testo. 

Questa routine, denominata DEFPROCTitolo, consente, unitamen¬ 
te a quella relativa aH’ingrandimento dei caratteri già vista al punto 
1 ed a quella definente le finestre di testo (punto 2), di ottenere una 
intestazione delle successive schermate e che resterà invariata al 


done lo schema organizzativo delle varie Directories e Sub-Directo- 
ries questa routine vi risparmierà molta fatica! 

Basterà inserire nella chiamata di questa procedura, cioè PROCca- 
sella(x%,y%,T$), le coordinate dell’angolo sinistro, in alto, della ca¬ 
sella che desiderate disegnare ed il suo titolo e la routine provvede- 
rà a disegnarvi nel punto desiderato una graziosissima casella in- 
corniciante perfettamente la scritta che avrete indicato. Se poi desi¬ 
derate che quanto è scritto nella casella venga evidenziato da un 
lampeggio di una certa durata, cui faccia seguito la rappresenta¬ 
zione in “reverse” della stessa scritta, vi basterà aggiungere la 
chiamata alla seconda procedura del listato in esame e quindi scri¬ 
vere: 

PROCcasella(x%,y%,T$):Z = INKEY(200):PRQCmarca(x%,y%,T$) 


susseguirsi delle varie pagine di testo. Nel listato i vari parametri so¬ 
no riferiti al caso che ci si trovi nel MODE 128: la routine sarà peral¬ 
tro perfettamente valida in tutti gli altri MODES grafici previa un’op¬ 
portuna modifica dei suddetti parametri. 

Nella definizione della stringa TitoloS occorre, ad evitare eventuali 
indesiderate sovrapposizioni, tenere ben presenti le avvertenze già 
date relativamente alla sua lunghezza. 

9: Tracciamento di caselle per gli schemi organizzativi. 

Se desiderate abbellire l’introduzione ai vostri dischetti presentan¬ 


10: Memoria residua + 11: Tempo dall'accensione. 

Queste due routines vi consentono di conoscere, evidenziandole in 
“reverse” in apposita finestra: 

- Con la chiamata PROCmem conoscerete quale sia la memoria (in 
bytes) occupata dal vostro programma e quella residua ancora a 
vostra disposizione (escluso però lo spazio occupato dalle variabi¬ 
li). 

- La chiamata PROCtempo vi consentirà invece di conoscere il tem¬ 
po (espresso in ore, minuti e secondi) che è trascorso dalla accen¬ 
sione del vostro computer. 
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PRODEST 



di ANGELO COCCETTINI e GIULIO VANNINI 

STUDIO DI 


'idea della stesura di un simile programma ci è stata 
suggerita dalla effettiva mancanza di uno Studio di 
Funzioni per il PC 128S nell’elenco software della no¬ 
stra rivista, anche se possiamo ricordare il famoso 
Spherograph che già lavorava su funzioni a due va¬ 
riabili indipendenti. 

Digitate con la solita calma il listato e dando RUN apparirà il menu 
principale. Le dieci opzioni possono essere selezionate attraverso 
l'uso dei tasti di cursore e la loro conferma attraverso RETURN. 
Commentiamo adesso brevemente la funzione e utilizzo di ognuna 
delle suddette opzioni. 

DEFINISCI LA FUNZIONE 

Attraverso questa opzione si può inserire nell’elaboratore una 
qualsiasi funzione del tipo y = f(x). Non vi è restrizione per quanto 
riguarda eventuali campi di definizione, poli, punti di discontinuità, 
ecc. 

Il programma, provvisto di una efficiente gestione degli errori prov¬ 
veder automaticamente alla esclusione dei punti non ammessi. 
Battendo RETURN senza introdurre alcuna funzione verrà assunta 
quella visualizzata immediatamente sopra l’input e posta, all’inizio 
del programma, pari a COS(X). 

DISEGNA IL GRAFICO 

Inizia la procedura di visualizzazione del grafico della funzione in¬ 
trodotta. Il programma chiede se deve cancellare la RAMDISK, cioè 
una parte di memoria riservata al salvataggio del grafico disegna¬ 
to. Ovviamente, all’inizio del programma, tale zona è vuota. Vengo¬ 
no quindi disegnati gli assi coordinati, se il dominio specificato 
consente la loro visualizzazione attraverso la finestra di schermo, e 
alcuni valori arbitrari su ogni asse, in modo da permettere una rapi¬ 
da comprensione sull’andamento generale della funzione. 

Se si vuole interrompere la procedura bisogna usare il tasto E. In 
ogni caso, prima di ritornare al menu, la finestra relativa al grafico 
viene salvata nella memoria Shadow. 

STUDIO PUNTUALE 

Scegliendo questa opzione viene visualizzato l’ultimo grafico sal¬ 
vato nella memoria Shadow. Attraverso l’uso dei tasti di cursore è 
possibile muovere una linea verticale lungo lo schermo, la quale in¬ 
dica con buona approssimazione un punto sull’asse delle x e il suo 
relativo calcolato attraverso la funzione. I tasti sono: cursore a sini¬ 
stra = sinistra, cursore a destra = destra, cursore in alto = sinistra 
veloce, cursore in basso = destra veloce, E = EXIT. 

In basso a sinistra vengono visualizzati i valori numerici dei due 
punti in esame. Con i tasti “ + ” e (da utilizzare senza shift), il va¬ 
lore della coordinata in ascisse viene incrementato di un millesimo, 


PC 128s 


Un potente programma per studiare 
le funzioni ad una variabile indipendente 

FUNZIONI 


cosi da permettere uno studio più preciso dell’intorno considerato. 
Tale procedura può risultare molto utile durante lo studio di più 
funzioni ed in particolare nei problemi di intersezione. 

DEFINISCI GLI ESTREMI 

Attraverso questa opzione è possibile modificare i valori degli estre¬ 
mi dell’intervallo di studio dell’asse reale, posti per default uguali a 
Xmin = -5 e a Xmas = 5. Viene richiesto, inoltre, lo step di definizio¬ 
ne, in dipendenza del quale varia la precisione del grafico. Faccia¬ 
mo notare che piccoli valori dello Step, fino ad un minimo di 2, defi¬ 
niscono una precisione maggiore, mentre valori crescenti consen¬ 
tono di aumentare la velocità di esecuzione del disegno a scapito 
di una peggiore definizione. Introdotti tali valori viene visualizzata 
una linea orizzontale la cui posizione può essere variata con i soliti 
tasti di cursore: cursore in alto = linea verso l’alto, cursore in basso- 
= linea verso il basso, cursore a destra = in alto veloce, cursore a 
sinistra = in basso veloce, RETURN per fissare la posizione. 

FUNZIONI PREDEFINITE 

Il nostro studio di funzioni possiede una piccola biblioteca conte¬ 
nente alcune funzioni predefinite. Facciamo notare che non abbia¬ 
mo scelto le solite funzioni continue come SIN, COS, TAN, LN ecc., 
ma una classe un po’ particolare. In effetti abbiamo definito una ta¬ 
bella di funzioni che ricorrono molto spesso in Teoria Dei Segnali, 
come Impulsi Unitari, Impulsi Traslati, Denti di Sega, Rampe e Gra¬ 
dini. Usare queste particolari funzioni è molto semplice: basta intro¬ 
durre la definizione a membro sinistro e sostituire, eventualmente, 
al posto di XO e YO dei valori numerici. 

INTEGRALE DEFINITO 

La scelta di questa opzione consente di calcolare l'integrale defini¬ 
to della funzione inserita. Vengono richiesti gli estremi di integrazio¬ 
ne e in breve tempo viene fornito il risultato numerico dell'integrale 
approssimato. L'algoritmo usato è l’ormai famoso metodo dei tra¬ 
pezi a base infinitesima, simulata al computer attraverso lo Step 
molto piccolo di un ciclo di FOR. 

VISUALIZZA LA RAMDISK 

Permette di visualizzare il contenuto della RAMDISK, consentendo 
di controllare l’ultimo grafico calcolato. 

VISUALIZZA GLI ASSI 

Dopo la definizione degli estremi è possibile disegnare, con opzio¬ 
ne, i soli assi, al fine di verificare se gli estremi in ascisse o in ordina¬ 
ta sono quelli richiesti. 
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PROGRAMMI 


INFORMAZIONI 

Visualizza informazioni relativamente agli estremi in ascisse e in or¬ 
dinata, il massimo ed il minimo neH’intervallo oltre alla definizione 
analitica della funzione stessa. 

FINE PROGRAMMA 

Il programma, grazie ad una struttura altamente procedurale, risul¬ 
ta molto semplice da capire e da modificare. Facciamo comunque 
notare che per poter usare la memoria Shadow come una RAM- 
DISK abbiamo dovuto usare il MODO 0 e ciò limita fortemente lo 
spazio a disposizione per eventuali aggiunte. In tal caso occorre¬ 
rebbe modificare il programma neutralizzando la procedura di ge¬ 
stione RAMDISK per il recupero, in MODO 128, dei 20 Kbytes della 
RAMDISK stessa. 


IO REM ********************** 

20 REM * Studio di Finzioni * 

30 REM * di * 

40 REM * Angelo Coccettini * 

50 REM * Giulio Vannini * 

60 REM ********************** 

70 MODEO 

80 GN ERROR GOTO 1870 
90 PROC„INIT 
100 F‘RQC_J3H0 I CE ( 20,10) 

110 IF N7.=2 GOTO 1250 

120 ON N7. PROC_FN, , PROC ^STUDIO, PROC__EX 
TR , PROC_SHOW , PROGNINTEGRALE , PROC_RD, PROC 
_V , F'ROC__I NFORM, F'ROC END 
130 GOTO 100 
140 END 
150 : s 

160 DEFPR0C_CH0ICE(X7.,V"/.) 

170 CLS:PROCJBOX:PROC CENTRE<T$,2)sPRO 
C JCENTRE ( A* (0) , 5) : N7.= 1 s REFEAT : PRINTTAB ( X 
7., Y7.+N7.-1 ) A* < N7. ) s N7.=N7.+1 : UNT IL Al( N7. ) = " " 
:N7.= 1:*FX4,1 

180 A*=AS(N7J+STRING*<40-LEN<A*<N7.) ) , " 
" ) s PROC CO : PR I NTTAB ( X%, Y7. ) A* : PROC JC1 
190 I7.=GET 

200 IF I7.= 13 OSCLI "FX4,0" : ENDPROC 
210 IF I7.= 139 AND N7.>1 PRINTTAB(X7.,Y7.) 
M : Y7.«Y%-1 : N%«N%-1 s GOTO 180 

220 IF I7.= 138 AND A$ (N7.+ 1 ) < >" " PRINTTA 
B ( X7., Y7. ) A* : Y7.=Y7.+1 s N7.=N7.+1 s GOTO 180 


230 

GOTO 190 


240 

m m 
■ a 



250 

DEFPROC 

OPTIONS 

260 

A$(0)=" 

STUDIO DI FUNZIONI A UNA V 

ARIABILE " 



270 

ii 

A*(l)=" 

n 

Definisci la funzione 

280 

A*<2)=" 

23 

Disegna il grafico" 

290 

A*<3)=" 

33 

Studio puntuale" 

300 

ii 

A*(4)=" 

43 

Definisci gli estremi 

310 

A*(5)=" 

53 

Funzioni predefinite" 

320 

A*(6)=" 

6 3 

Integrale definito" 


330 

A*(7)=" 

73 

Visualizza la RAMDISK 

340 

A*(8)=" 

83 

Visualizza gli assi" 

350 

A*<9)=" 

93 

Informazioni" 

360 

A*(10)=" 

103 

Fine programma" 


370 ENDPROC 
380 : ; 

390 DEFPROC__INIT 
400 VDU23,1 !s 
410 DIM A$(15) 

420 ER=. 005: TT=0: PX7.=512: MIN=-5: MAX=5: 
C0EFX=128:MAXY=5.03:MINY=-2.08:F1*="C0S( 
X ) " : DF7.= 12: MAXF=1 :MINF=-1 
430 F*=F1* 

440 T$=" " +STRING$ (3 , CHR$217)+" "+CHR 
*226+CHR*229+CHR*243+CHR$225+ n Software 
"+STRING$(3,CHR$217)+ M " 

450 PROC_CLR_RD 
460 PROCJDPTIONS 
470 ENDPROC 
480 : : 

490 DEFPROC_CENTRE ( A* , Y7.) : P7.= (BO-LEN ( A 
$ ) ) /2 : PR I NTTAB ( P7., Y%-1 ) CFIR* 163 ; STRING$ ( L 
EN(A$>,CHR$166);CHR^165 

500 PRINTTAB (P%, Y%) CHR* 169;A$; CHR*169: 
PR I NTTAB ( P7., Y7.+1 ) CHR* 170 ; STR I NG$ ( LEN ( A$ ) 
,CFIR$166);CHR*<172>:ENDPROC 
510 :: 

520 : : 

530 DEFPROC_FN 

540 PRINTTAB(5,23)"Funzione corrente: 
";F1$ 

550 INPUT LINE TAB (5,25) " Inserire la f 
unzione: f(x)=" F$ 

560 IF F$="" F$=F 1 $■ ELSE F1$=F* 

570 VDU23,1I 
580 ENDPROC 
590 : : 

600 DEFF’ROCJEXTR 

610 INPUTTAB(20,23) "Minimo (default = 
-5): "MIN*:IF MIN*="" MIN$="-5":PRINTTA 
B(44,23)"-5" 

620 INPUTTAB(20,24)"Massimo (default = 
5): "MAX$:IF MAX*="" MAX$="5":PRINTTAB 
(44,24)"5" 

630 MIN=EVAL(MIN*):MAX=EVAL(MAX*) 

640 IF MIN>=MAX PRINTTAB(20,23)SPC(50) 
:PRINTTAB(20,24)SPC(50): GOTO 610 

650 INPUTTAB(20,26)"Definizione (defau 
lt = 12): "DF7, : IF DF7.=0 DF7.= 12: PRINTTAB ( 
48,26)"12" 

660 PROC__AXES 

670 C0EFX=1280/(MAX-MIN):MAXY=(1024-PX 
7.) * <. 889/COEFX ) : MINY=-F’X7.* (. 889/COEFX ) 
680 ENDPROC 
690 : : 

700 DEFPROC_RD:CLS: OSCLI "FX113,2": I7.=G 
ET:OSCLI"FX113,1":ENDPROC 

710 DEFPROC _CLR__RD : OSCL I " F X112,2 " : CLS : 
OSCLI"FX112,1":ENDPROC 

720 DEFPROC___CLR__S: OSCLI "FX 112,1 " : CLS: 0 
SCLI"FX112,2":ENDPROC 
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730 s : 

740 DEFPR0C_AXES 
750 CLS 
760 *FX4,1 

770 PX7.=512: M0VE0,512: DRAW 1279,512 
780 PRINTTAB(0,31)"Posizione X: 300"; 
790 I’/.=GET 

800 IF I7.= 13 OSCLI "FX4,0" : ENDPROC 
810 M0VE0,PX7.:PL0T3,1280,0 
820 PX7.=PX7.-4* ( I7.= 139) +4* ( 17.= 138) -40* ( 
I7.= 136)+40*<17.= 137) 

830 PRINTTAB(0,31)"Posizione X: "STR$P 
X7." "; 

840 M0VE0,PX7.:PL0T1 , 1280,0 
850 GOTO 790 
860 : : 

870 DEFPRQC__V : CLS : PROC__D_AXES: PROC_PAU 
SE:ENDPROC 

880 DEFPROC_MSG(A$):PROC_CO:PRINTTAB(1 
, 28 ) A$ ; : PROC__C 1 : PROC_PAUSE : ENDPROC 
890 IF A$<>' M ' PRINTSPC (30) 

900 PROC_PAUSE:ENDPROC 

910 DEFPROC_BOX :MO VEO,0:PL0T5,0,1023:P 
L0T5,1279,1023:PL0T5,1279,0:PL0T5,0,0:EN 
DPROC 

920 DEFPRQC_C0 : COLOURO : COLOUR129:ENDPR 
OC 

930 DEFPROC_C1 :COLOUR1 :COLOUR128:ENDPR 
OC 

940 : : 

950 DEFPROC_D_AXES 
960 5>7.=&01020200 
970 K=(MAX-MIN)/40 
980 M0VE0,PX7.:PL0T1 , 1279,0 
990 PY7.= 1280-MAX*CQEFX: MOVE PY7.,0:PL0T 
1,0,1024: MOVE PY7.+2,0: PL0T1,0,1024 
1000 IF PX7.>=0 AND PX%<»1024 AND PY%>»0 
AND PY7.O1280 PROC.SPX ( 1 ) : PROC_SPY ( 1 ) : G 
OTO 1030 

1010 IF PX7.C0 OR PX7.M024 PROC_SPY (0) : G 
OTO 1030 

1020 IF PY7.C0 OR PY7.M280 PR0C_SPX(0) 
1030 VDU4:VDU23,1 ! :PROCJBOX 
1040 ENDPROC 
1050 : : 

1060 DEFPROC__SPX (FLG7.) 

1070 IN=0: IF FLG7.=0 IN=MIN 
1080 FOR F7.=0 TO 39: CX 17.=PX7.-8+8* (F7. MO 
D 5=0) :CX27.=32*F7.+PY7.*FLG7.:CX37.=PY7.*FLG7. 
-32*F7.:CX47.= 16-16*(F7. MOD 5=0): MOVE CX27. 
, CX 17.: PLOT 1,0, CX47.: MOVE CX27.+2, CX 17.: PLOT 
1,0,CX47.:M0VE CX37.,CX 17.: PL0T1,0,CX47.: MOV 
E CX37.+2,CX17.:PL0T1,0,CX47. 

1090 IF (F7. MOD 5=0) ESF‘=IN+K*F7.: VDU5: M 
OVE CX27.+8,CX17.-8: IF CX2X+8+16*LEN (STR$E 
SP) < 1280 F*RINTSTR*ESP 
1100 IF (F7. MOD 5=0) THEN IF F7.>1 VDU5: 
MOVE CX37., CX17.-8: PRI NT" - "STR$ESP 
1110 NEXT 
1120 ENDPROC 


1130 : : 

1140 DEFPRQC__SPY ( FLG7. ) 

1150 IN=0: IF FLG7.=0 IN=MINY 
1160 FOR F7.=0 TO 39: CX 17.=PY7.-8+8* (F7. MO 
D 5=0) :CX27.=36*F7.+PX7.*FLG7.:CX37.=PX7.*FLG7. 
-36*F7.:CX47.= 16-16*(F7. MOD 5=0): MOVE CX17. 
, CX27. : PLOT 1 , CX47., 0: MOVE CX17., CX37. : PLOT 1, 
CX47.,0 

1170 IF (F7. MOD 5=0) AND F7.>1 ESP=IN+K* 
F7.: VDU5: MOVE CX 17.+48 , CX27.: IF CX 17.+48-»-16* 
LEN (STR$ESP) < 1280 PRINTSTRSESP: MOVE CX17. 
+48, CX37.: PRINT"-"STRSESP 
1180 NEXT 
1190 ENDPROC 
1200 :: 

1210 DEFPROC_PAUSE 
1220 VDU23,1 !:*FX4,1 
1230 17.=GET : ENDPROC 
1240 ENDPROC 
1250 :: 

1260 PR0CJ1SG("Cancello la RAMDISK (Y/N 
) ?" ) : IF 17.078 AND 17.0110 PROC_CLR_RD 
1270 OSCLI"FX113,2":OSCLI"FX112,2":GOSU 
B 1520:PROC^PAUSE:PROC_CLR_S:OSCLI"F X113 
,1":OSCLI"FX112,1": GOTO 100 
1280 : : 

1290 DEFPROC.INTEGRALE 

1300 CLS:PROC_CENTRE("INTEGRALE DEFINIT 
0",2):PRQC_BQX 
1310 PRINTTAB (5,8) "-f (x)="F$ 

1320 PRINTTAB(8,11)"U1timo valore calco 
lato:"TT 

1330 PROCJISG("Premere RETURN per esegu 
ire il calcolo") 

1340 IF T7.013 ENDPROC 
1350 PRINTTAB(1,28)SPC(60) 

1360 INPUTTAB( 10,15) "Minimo (de-fault = 
-5): " INF*: INPUTTAB (10,17) "Massi mo (de-f 
ault = 5): "SUP$ 

1370 IF INF*O m " INF=EVAL ( INF$) ELSE IN 
F=-5 

1380 IF SUPSO"" SUP=EVAL (SUP$) ELSE SU 
P=5 

1390 IF INF>SUP GOTO 1300 

1400 PRINTTAB(1 ,28) "Attendere..." 

1410 CIX-OlREG=1:TT=0:DELT A=SUP-1NF : X=( 
INF+DELTA/2)*DELTA:SUM=EVAL(F$) 

1420 REPEAT 

1430 IF INKEY*(0)="E" OR INKEY^(0)="e" 
PROCJ y !SG( "Cai colo interrotto! ") :CI7.= 1:G0 
TO 1460 

1440 REG=REG*2:LTOT=TT:TT=0:DELTA=(SUP- 
INF)/REG 

1450 FOR F7.= l TO REG: X = INF+DELTA* (F7.-. 5 
):VUE=EVAL(F^):SUM=VUE*DELTA:TT=TT+SUM:N 
EXT F7. 

1460 UNTIL ABS (TT-LTQT) <ER OR CI7.= 1 
1470 IF CI7.= 1 ENDPROC 

1480 PRINTTAB(1,28)SPC(60):PRINTTAB(10, 
20) "IC-f (x) 3 = "+STR$ (TT) 

1490 PRINTTAB (10,22) "Errore: "+CHRf-218+ 
STR$(ER) 

1500 PROC MSG( "Ancora (Y/N)?"):IF I7.=89 
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GOTO 1300 ELSE ENDPROC 


1950 PRINTTAB(27,10) "Massimo della funz 

1510 :: 


ione s"MAXF 

1520 PROC D AXES 


1960 PRINTTAB(27,11)"Minima della funz 

1530 5>7=&00020A00:LASTX7=0: J7=0: INR=(MA 


ione s"MINF 

X-MIN)/1280 


1970 PRINTTAB(27,14)"Massimo sull’asse 

1540 MAXF=0:MINF=0 


X s"MAX 

1550 REPEAT 


1980 PRINTTAB(27,15)"Minimo sull’asse 

1560 X=MIN+INR*J7 


X s"MIN 

1570 VLE=EVAL(F*>:IF VLE>MAXF MAXF=VLE 


1990 PRINTTAB(27,17)"Massimo sull’asse 

1580 IF VLE>MAXF MAXF=VLE 


Y s"MAXY 

1590 IF VLECMINF MINF=VLE 


2000 PRINTTAB(27,18)"Minimo sull’asse 

1600 Y7=VLE*C0EFX/.889+PX7 


Y s"MINY 

1610 IF J7=0 LASTY7=Y7 


2010 5>7=&00020A00 

1620 IF Y7>-5000 AND Y7C6000 AND LASTY7 


2020 PROC BOX 

>-5000 AND LASTY7C6000 MOVE LASTX7, LASTY 


2030 PROC MSG("")s ENDPROC 

7..-DRAW J7,Y7 


2040 s s 

1630 MOVEJ7-, 0 : PL0T2,0,1024 s MOVEJ7, 0: PLO 


2050 DEFPROC END:CLSsPROC CENTRE(" FINE 

T2,0,1024: LASTX7=J7: LASTY7=Y7 


PROGRAMMA ",10)sPROC_BOXsEND 

1640 J7=J7+DF7 


2060 ;s 

1650 UNTIL INKEY$ (0)="E" OR INKEY$<0>=" 


2070 DEFPROC SHOW 

e" OR J7> 1400 


2080 CLSsPROC_CENTRE<" FUNZIONI PREDEFI 

1660 PROC CO:PRINTTAB(2,2)" f(x)="+F*;s 


NITE ",3) 

PROC CI SPRINT" "? 


2090 PRINTTAB (4,07) " 1] FN JH ( X ) =1/2+ ( 1 / 

1670 RETURN 


2)*SGN(X)" 

1680 ss 


2100 PRINTTAB(4,08)" 21 FN_WIN(X,XO)=FN 

1690 DEFPROC STUDIO 


H(X+XO)-FN H(X-XO)" 

1700 CLSs OSCLI"FX4,1"sOSCLI"FX113,2": OS 


2110 PRINTTAB (4,09) " 3] FN_DF’ (X , XO) =FN_ 

CLI"FX112,2" 


H(X+XO)-2*FN H(X)+FN H(X-XO)" 

1710 M0VE640,0 : PL0T2,0,1024 s PZ7=640s 5)7.= 


2120 PRINTTAB(4,10)" 4] FN PUL(X,XO)=FN 

&0L020300 


H(X)-FN U(X-XO)" 

1720 REPEAT 


2130 PRINTTAB(4,11)" 53 FN_DPT(X,XO,YO) 

1730 17.=GET 


=FN DP(X,XO)-FN DP(X,YO)" 

1740 IF 17=59 X=X+.001:PROC PsG0T01730 


2140 PRINTTAB (4,12)" 6] FN SAW<X,XO)=<X 

1750 IF I7.=45 X=X-,001 : PROC PsG0T01730 


*FN H(X)-X*FN H(X-XO))/ABS(XO)" 

1760 MOVE PZ7.,0s PL0T2,0,1024 


2150 PRINTTAB(4,13) " 71 FN.SQE<X,XO)=<< 

1770 PZ7=PZ7-2* ( 17=137) +2* ( 17=136 ) -40* ( 


X‘"'2) *FN JH ( X ) - ( X Xs 2) *FN JH (X—XO) ) / (X0^*2) " 

17=138)+40*(17=139) 


2160 PRINTTAB(4,14)" 8] FN_TRG(X,XO)=FN 

1780 X=MIN+PZ7/C0EFX 


SAW(-(X+XO),-XO)+FN_SAW(-X+XO,XO)" 

1790 PROC 


2170 PRINTTAB(4,15)" 91 FN Y(X,XO,YO)=F 

1800 M0VEPZ7,Os PL0T2,0,1024 


N I(X,XO)+FN I(X,Y0)" 

1810 UNTIL 17=69 OR 17=101 


2180 PROC BOX:PROC FN:ENDPROC 

1820 MOVE PZ7,Os PL0T2,0,1024s PRINTTAB ( 1 


2190 ss 

,29 ) SPC ( 25 ) s PRINTTAB ( 1,30 ) SPC ( 25 ) s OSCLI " 


2200 REM *** FUNZIONI PREDEFINITE *** 

FX 113,1" s OSCLI "FX 112,1":5>7=&00020A00: END 


2210 ss 

PROC 


2220 DEFFN H(X) :=( 1/2+ ( 1/2)*SGN(X) ) 

1830 ss 


2230 DEFFN WIN ( X,XO)s=FN H(X+XO)-FN H(X 

1840 DEFPROC J=*s PRINTTAB (1,29) "Valore f( 


-XO) 

x) s ";EVAL<F$) ;" "; sPRINTTAB ( 1,30) " 


2240 DEFFN_DP ( X , XO) s =FN_H (X + XO) -2*FN__H ( 

Valore x s ";X;" ENDPROC 


X ) +FN H(X-XO) 

1850 ss 


2250 DEFFN PUL ( X,XO)s=FN_H ( X ) -FN JH ( X-XO 

1860 REM *** ON ERROR TRAP *** 


) 

1870 IF ERR=26 PROC MSG ( "Espressione no 


2260 DEFFN___Y ( X , XO, YO) s =FN_DP ( X , XO) +FN__D 

n corretta")sGOTO 100 


P ( X,YO) 

1880 IF ERR>17 AND ERRC25 J7=J7+DF7sMOV 


2270 DEFFN DPT(X,XO,YO)s =FNJDP ( X,XO)-FN 

EJ7,0s PL0T2,0,1024 s MOVEJ7,0 s PL0T2,0,1024 


DP ( X,YO) 

sLASTX7=J7sLASTY7=Y7sIF J7C1300 G0T01550 


2280 DEFFN_SAW ( X,XO)s = ( X*FN_H ( X ) -X*FNJH 

ELSE PROC PAUSEsGOTO 100 


(X-XO))/ABS(XO) 

1890 REPORT s STOP 


2290 DEFFN SQE(X,XO):=((X^2)*FN_H(X)-(X 

1900 ss 


■ s 2) *FNJH (X-XO) ) / (XO’^2) 

1910 DEFPROC INFORM 


2300 DEFFN__TRG ( X , X0) s =FN_SAW (-( X+XO) ,-X 

1920 5>7=&01020400 


0)+FN SAW(-X+XO,XO) 

1930 CLSsPROC CENTRE("INFORMAZIONI",2) 


2310 DEFFN__Y ( X , XO, YO) : =FN J)P ( X , XO) +FN__D 

1940 PRINTTAB(27,07)"f (x) = " ; F$ 


P(X,YO) à 
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Olivetti 


PRODEST 



PC 128s 


Un menu ad icona discendente , 


di BRUNO PARBONI ARQUATI sui tipo del disco “Welcome” 


UN MENU IN STILE 
“WELCOME” 


_ li utenti dell’Olivetti PC 128 S, avranno senza meno 

i ammirato ed apprezzato il tipo di “Menu” adottato 

| nel disco “WELCOME" fornito come dotazione stan- 

dard del Computer. 

Si tratta di un tipo di Menu denominato "a tendina 
discendente” o “Pulì Down”. 

Nella versione adottata nel disco “WELCOME" la selezione delle 
directory (che vengono elencate in appositi riquadri di una striscia 
che occupa la parte superiore dello schermo) si effettua spostando 
una freccia a mezzo dei tasti cursori (o del “mouse” se lo si possie¬ 
de) sul riquadro che interessa, e poi premendo <RETURN>. 

A questo punto il riquadro selezionato cambia di colore ed appare 
un elenco dei programmi disponibili nella directory, in forma di ta¬ 
bella contenente nei suoi vari riquadri i nomi estesi dei programmi 
disponibili. Effettuata, nel solito modo, la selezione del programma 
che si desidera caricare lo stesso viene direttamente lanciato. 
Questa procedura è resa possibile dalle varie routine in L.M. cari¬ 
cate airavviamento iniziale del disco. 

Il Programmino che vi propongo opera in maniera abbastanza si¬ 
mile, anche se è scritto interamente in BASIC e senza fare ricorso a 
routine in L.M.: la selezione delle directory e dei Programmi in esse 
contenuti avviene mediante la semplice digitazione dei tasti nume¬ 
rici, il tutto senza alcuna necessità di premere il solito tasto <RE- 
TURN>. 


Rispetto al “Menu” di “WELCOME” non solo i riquadri cosi selezio¬ 
nati cambiano di colore, ma lampeggeranno per un certo numero 
di volte restando poi nei colori inversi rispetto a quelli inizialmente 
adottati. 


OSSERVAZIONI E COMMENTI SUI LISTATO 

Nel listato allegato sono state previste quattro diverse directory, 
ognuna contenente dieci programmi: al limite il numero delle direc¬ 
tory rappresentabili potrebbe anche essere aumentate a cinque o 
sei, sia pure a scapito della rappresentazione grafica, dovendo li¬ 
mitare la lunghezza dei titoli. 

In coda al listato principale ne viene riportato un secondo, che è li¬ 
mitato alle sole righe da modificare del programma di base, per au¬ 
mentare a 5 le directory rappresentabili. 


I Nomi delle stesse sono caricati in apposita matrice di stringhe mo¬ 
nodimensionale, opportunamente dimensionata, leggendone le 
denominazioni da una riga di DATA inserita in fondo al program¬ 
ma. 

Analoga procedura dovrà essere seguita per i nomi dei vari pro¬ 
grammi da caricare: nel listato si è adottato, unicamente a puro ti¬ 
tolo di esempio, una denominazione unica seguita poi da due indi¬ 
ci numerici. 

Nella vostra applicazione pratica potrete invece adottare due di¬ 
verse matrici di stringhe, ognuna a due dimensioni, e di cui una per 
inserirvi le denominazioni estese che appariranno sulla tabella dei 
programmi disponibili (potrete visualizzare stringhe fino a 18 carat¬ 
teri, comprendenti anche spazi vuoti o caratteri non ammessi) e 
l’altra da riservare ai veri Nomi dei programmi da caricare, la cui 
lunghezza è invece limitata a 10 soli caratteri e senza alcuno spazio 
intermedio. 

II listato, considerato il suo carattere dimostrativo, si limita alla sola 
parte grafica di presentazione del “Menu” ed al sistema di eviden¬ 
ziazione della directory e del Programma prescelti e non prevede di 
effettuare né la selezione della directory né tanto meno, il carica¬ 
mento del programma, e che dovranno essere da voi adattati alle 
vostre necessità. 

SUGGERIMENTI PER RENDERE OPERATIVO 
IL LISTATO 

Supponiamo che le directory utili del vostro disco, nel quale deside¬ 
rate installare il “Menu" proposto (escludendo al solito la directory 
“LIBRARY”) siano quattro, denominate: 

ELENCHI ; FUNZIONI , GRAFICA, MATEMATICA 

Prevediamo quindi, con un DIM Directory$(4), la necessaria matrice 
e carichiamovi i vari nomi opportunamente completati, come nell’e¬ 
sempio, del relativo numero d’ordine e degli spazi iniziali e finali per 
avere stringhe della medesima lunghezza: così operando la prima 
directory si chiamerà “ 1: ELENCHI ”. Potrete adoperare di¬ 
rettamente la stringa Directory$(Dir%), se la variabile Dir% è stata 
associata al tasto premuto, con il piccolo e semplice artifizio sotto- 
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riportato, inserendo nel listato, prima dell’ END con cui termina il 
programma vero e proprio, la seguente riga: 

DIR$ = “DIR ” + MID$(Directory$(Dir%),5):OSCLI DIR$ 

Una procedura del tutto analoga potrà essere seguita anche 
per caricare il programma contenuto ad esempio nella directory 
sopracitata: ammettiamo si tratti del programma “Catalogo”, 
il cui nome risulta essere associato alla stringa bidimensionale 
Pro$(Dir%,pro%). 

In questo caso inserite, accodandola alla riga precedente, una 
istruzione come quella sottoriportata: 

CHAIN Pro$(Dir%,pro%) 

La directory “ELENCHI" verrà così regolarmente selezionata ed il 
programma “Catalogo” in essa contenuto verrà caricato: il tutto 
mediante la semplice digitazione di due tasti. 




6: Programma 3.6 



« MENU' DI SELEZIONE DELLE DIRECTORIES E DEI PROGRAMMI IN ESSE CONTENUTE « 

Per selezionare la Directory desiderata prewine il nunero corrisp 
Scegli il orografia digitandone il nunero d'ordine della lista Ir. 
PROCEDO ORR fl CARICARE IL PROGRAMMA Progranna 3.6 DELLA DIRECTOR 

ondente 

: 3 

M: 6 
RES 


10REM 

* 

20REM 

* 

30REM 

* 

40REM 

* 

50REM 

* 

60REM 

* 

70REM 

* 

80REM 

90: 

* 


************** 

"Pulì-Menu'" 

Menu stile "WELCOME" per la 
selezione delle Directories 
e la successiva scelta e il 
caricamento di un programma 
in essa contenuta 
************** 


ÌOOREM Bruno PARDONI ARQUATI - Roma 
- Ottobre 1988 - 


* 

* 

* 

* 

* 

* 

* 

* 


11OMODE128:DIM Dir* *(4),Pro$(4,IO) 
120F0R i7.= l TO 4:READA*:Dir*(i7.)=" "+S 


TR*i 7.-»* " s " +A* s 1 7.=LENDi r * ( i 7. ) 


130IF 17.C14 THEN Dir* (i7.) =Dir* (i7.) +STR 


ING* ( 14-17., " " ) : NEXT ELSE NEXT 

140F0R i 7=1 TO 4s FOR j7.= l TO 10:n*=STR 
*j7.+ ": IF LEN n*<3 THEN n*=" "+n* 

150Pro* (i7., j%) =n*+" Programma "+5TR*i7. 
+ ". "+STR*j7.: 17.=LENPro*(i7., j7.) : IF 17.C18 T 
HEN Pr o* ( i 7., j 7. ) =Pr o* ( i 7., j 7. ) +STRI NG* (18-1 
7.," "): NEXT: NEXT ELSE NEXT: NEXT 

160GC0L32,2:M0VE4,932: PLOT101,1274,101 
8:GCOLO,1 :MO VEO,928:PL0T2,1278,0:PL0T2,0 
,94:PL0T2,-1278,0:PL0T2,0,-94:MO VE2,928 : 
PL0T2,0,94:MOVE1276,928:PL0T2,0,94 

170PRINTTAB(0,24)CHR*163;STRING*(78,CH 
R*166) ; CHR*165; : FOR i7.=25 TO 29: PRINTTAB 
(0,i7.)CHR*169;TAB(79,i7.)CHR*169; :NEXT:PR 
INTTAB ( 0, i 7. ) CHR* 170 ; STR ING* ( 78, CHR* 166); 
CHRS172; 

180PRINTTAB(3,25)" # MENU’ DI SELEZIONE 
DELLE DIRECTORIES E DEI PROGRAMMI IN ES 
SE CONTENUTE #";TAB(0,26)CHR*171;STRING* 
<78,CHR*166);CHR*173; 

190di r7=l : FOR k7.=0 TO 70 STEP 20 
200PR0Cmess ( k7.+2,0, Di r* (di r 7. ) f 0 ) : d i r 7.= 
dir7+l:NEXT 

210PRINTTAB(2,27)"Per selezionare la D 
irectory desiderata premine il numero co 
rri spandente : " ; : R'EPEAT: Di r7.=GET-48: UNT 

IL Di r 7.>0 AND Dir7.<5: PRINTSTRSDir7«; 


220x=2+20* (Di r7.-1 ) : y=0: PROCmarca (x , y, D 
ir* (Dir7.) ) 

230k7.= (Di r7.-1 ) *20: PROCmul t i p 1 a ( k7., 4,10 
,STRINGA(18," ")) 

240nr7.= l : FOR j7.=4 TO 22 STEP 2 
250PR0CÌnv: PRINTTAB (k7.+1 , j7.)Pro* (Di r7., 
nr7.) : nr7.=nr7.+ l: VDU20: NEXT 

*260PRINTTAB(2,28)"Scegli il programma 
digitandone il numero d'ordine della lis 
ta "5 :PROCinv:PRINT"(0 per 10)"; :VDU20:P 
RINT": " ; : REPEAT: pro7=GET-48: UNTIL pro7.> 
=0 AND pro7.<=9:IF pro7.=0 THEN pro7.= 10 
270PRINTSTR*pro%; : x=20* (Dir7.-1 ) : y=l+2* 
pro7.: PROCmarca (x , y ,Pro$ (Dir7,pro7.) ) 

280PRINTTAB(2,29)"PROCEDO ORA A CARICA 
RE IL PROGRAMMA MID* (Pro* (Dir7.,pro7.) ,5 
>;" DELLA DIRECTORY 11 jMID* (Dir* (Dir%> ,5) 

■i 

290PR0Cpausa:PRINTTAB(0,31); 

300END:REM - 

310: 

320 DEFPROCmess(x7.,y7.,m*,t7.) 

330IF t7.= l THEN PROCcasella ELSE 340 
340px 7.=x 7.* 16+12: py7.=952-y7.*32: 1 s7.=LENm 

**16+4 

350M0VEpx7., py7.: PLOT 101 , px7.+1 s7., py7.+48 
360PR0Cinv: PRINTTAB (x7.+ l ,y7.+ l ) m*: : VDU2 

0 

370col=3:PROCriquadra 

380 ENDPROC 

390: 

400 DEFPROCcasel1 a 

4101 m7.=LENm* : PRI NTTAB ( x 7., y7. ) CHR* 163 ; ST 
RING* ( 1 m%, CHR* 166); CHR* 165 ; TAB ( x 7., y7.+1 ) C 
HR* 169 ; TAB ( x 7.+1 m7.+1 , y7.+1 ) ; CHR* 16 9 ; TAB ( x 7. 
, y7.+2 ) CHR* 170 ; STR ING* ( 1 m7., CHR* 166); CHR* 1 
72; 

420 ENDPROC 
430: 

440 DEFPROCmu 11 i p 1 a ( x 7., y i 7., n7., m* ) 

450t7.=0 : y7.=yi 7. : 1 s7.=LENm** 16+4: MOVE ( x 7. 
* 16 ) +6,1040-y7.*32 : PL0T2,0, -n7.*6 4 

460M0VE ( x7.* 16 ) +6,1040-y7.*32: PL0T2,1 s7. 
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+ 12, 0: PL0T2,0, -n7.*64 

470F0R i7.=yi7. TD yi 7.+2* <n7.-l > STEP2:y7. 
=i 7.-1 

480PR0Cmess ( x 7., i 7.-1, m$, 17. ) 

490PR0Ccontorna:NEXT 

500 ENDPROC 

510: 

520 DEFPR0Cmarca(x7.,y7.,m$) 

530F0R a7.=0 TQ 6 

540IF a7. MQD2=0 THEN 550 ELSE PROCmess 
<x7.,y7.,m$,0) : GOTO 580 

550px 7.=x 7.* 16+12s py7.=952-y7.*32: 1 s7.=LENm 
16+4 

560M0VEpx7., py7.: PLOT 102, px7.+l s7., py7.+48 
570PRINTTAB (x7.+ l, y7.+1 ) m$ 

580Z=INKEY(40):NEXT:col=2:PROCriquadra 
590 ENDPROC 
600: 

610 DEFPROCpausa 

620REPEAT:PRINTTAB<25,31)"< PREMI LA B 
ARRA DEGLI SPAZI >"5 :Z = INKEY(50):IF Z=32 
THEN 640 

630PRINTTAB(25,31)STRINGA(30," ") ; :Z=I 
NKEYC50) 

640UNTIL Z=32 
650 ENDPROC 
660: 

6 70 DEFPROCinv:COLOURO:COLOUR129:ENDPR 
OC 

680 DEFPROCsound: SOUND1,-12,85,8:ENDPR 
OC 

690 DEFPROCcontor na : MOVE ( x 7.* 16 ) +6,946- 
y7.*32 : PL0T2,1 s7.+12,0: ENDPROC 

700 DEFPROCr i quad r a : MOVE (-x 7.* 16 ) +1 a,-948 
~y7.*32: PLOTcol , 1 s7.+4,0: PLOTcol ,0,56: PLOT 
col ,-(ls7.+4) ,0: PLOTcol ,0,-56: ENDPROC 
710: 

720REM-DATA- 

730DATA ELENCHI , GRAFICA, ROUTINES, WORD__ 
PROC 


ÌOR'EM **************** 

20REM * "Pul1-MenuM" * 

30REM * ## LISTATO MERGEABILE! ## * 

40REM * Modifiche da apportare al * 
50REM * listato di "Pul1-Menu’" per * 
60REM * ottenere cinque Directories * 
70REM * rappresentabi1i sul "Menu"" * 
80REM **************** 
90: 

100REM Bruno PARBONI ARQUATI - Roma 
- Ottobre 1988 - 

11OMODE128:DIM Dir*(5),Pro*(5,10) 
120F0R i7.= l TO 5 : READA$ :Dir$(i7)=" "+S 
TR$i 7.+ " : " +A* : 17.=LENDi r * ( i 7. ) 

130TF' 1>C< 14 THEN Dir^(i7.)=Dirf(i7.)+STR 
TNG$ C14-17, 11 " > : NEXT "ELSE NEXT 

140F0R i V.-l TO 5: FOR j7.= l TO 10:n*=STR 


$ jX+":":IF LEN n*<3 THEN n*=" "+n$ 

150Pro$ (iX, jVm) ~n$+" Programma "+STR$i7. 
+ ". " +STRT j 7. : 17.=LENPr o# ( i 7-, j 7- ) : IF 17.C18 T 
HEN Pro* (i7., j%> =Pra* ( i 7., j7.) +STRING* (18-1 
7.," "): NEXT: NEXT ELSE NEXT: NEXT 

160GC0L32,2:M0VE4,932:PL0T101,1274,101 
8 : GCOLO,1 : MGVEO,928:PL0T2,1278,0:PL0T2,0 
,94:PL0T2,-1278,0:PL0T2,0,-94:M0VE2,928 s 
PL0T2,0,94:MOVE1276,928:PL0T2,0,94 

170PRINTTAB(0,24)CHR*163;STRINGA(78,CH 
R* 166 ) ; CHR$165; : FOR i7.=25 TO 29: PR INTTAB 
'< 0, i 7. ) CHR* 169 ; TAB ( 79, i 7. ) CHR* 169 ; : NEXT : PR 
INTTAB (0, i7.) CHR* 170; STRING$ (78 , CHR* 166); 
CHRS172; 

180PRINTTAB(3,25)"# MENU’ DI SELEZIONE 
DELLE DIRECTORIES E DEI PROGRAMMI IN ES 
SE CONTENUTE TAB(0,26)CHRS171 ; STRINGA 

(78,CHR*166):CHR$173; 

190dir7.= l:F0R k7-=0 TO 64 STEP 16 
200PR0Cmess ( k7., 0, Di r * (d i r% ) , 0) : d i r 7.=d i 
r'X+1 : NEXT 

210PRINTTAB(2,27)"Per selezionare la D 
irectory desiderata premine il numero co 
rri spondente : " ; : REPEAT: Di r7.=GET—48: UNT 

IL Dir%>0 AND Dir7.<=5: PRINTSTRtDi rX; 

220x = 16* (Dir7.-1) : y=0: PROCmarca (x ,y,Dir 
$ (DirX)) 

230IF Dir%<5 THEN k7.= (Dir7.-1 ) *16 ELSE 
k7.=60 

240PR0Cmu 11 i p 1 a ( k7., 4,10, STR ING* (18," " 
) ) :nr7.= l:F0R j7.=4 TO 22 STEP 2 

250PR0Ci n v: PRINTTAB ( k7.+1, j7. ) Pr 0 $ (Di r7., 
nr7.) : nr7.=nr7.+ l : VDU20: NEXT 

260PRINTTAB(2,28)"Scegli il programma 
digitandone il numero d’ordine della lis 
ta "; :PROCinv:PRINT"(0 per 10)"; :VDU20:P 
RI NT": "; : REPEAT: pro7.=GET~48: LJNTIL pro7.> 
=0 AND pro7.<=9: IF pro7.=0 THEN pro7.= 10 
270PRINTSTRf pro7.; : y=l+2*pro7.: IF Dir7.<5 
THEN x = 16*(Dir7.-l) ELSE x=60 
275PR0Cmarca (x , y, Pro* (Di r7., pro7.) ) 

280PRINTTAB(2,29)"PROCEDO ORA A CARICA 
RE IL PROGRAMMA " 5 MID* (Pro* (Di r7., pro7.) , 5 
);" DELLA DIRECTORY H ;MID*(Dir*(Dir%),5) 

290PR0Cp ausa:PRINTTAB(0,31); 

300END:REM - 

310: 

720REM-DATA- 

730DATA ELENCHI,FUNZIONI,GRAFICA,ROUTI 
NES,WORD__PROC 
740: 

750REM ****** ISTRUZIONI PER IL CARI 
CAMENTO DELLA VARIANTE ****** 

760REM 1: Caricate "Pul1-Menu’" median 
te un comando LOAD"Pul1-Menu’" 

770REM 2: Di seguito caricate questo 1 
istato con il comando *EXEC"Pul1-MenuM" 
780REM 3: Listare, eliminare queste ul 
tirrne righe superflue, aggiornare la 

790REM in'testcLzaooe del programma e 
salvatelo con un nuovo Nome. 

>VDU3 
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Olivetti 


PRODEST 


PC 128 


Un potente assemblatore, scritto 


completamente In BASIC, per programmare in linguaggio mac- 



uello che vi proponiamo in queste righe è un potente 
assemblatore scritto interamente in BASIC, cioè un 
compilatore che permette di scrivere un programma 
in linguaggio assembler, quindi in una forma di codi¬ 
ce molto vicina al linguaggio macchina del PC 128. 
Nei numeri precedenti di LIST è apparso un corso di assembler, e 
per quanti lo hanno seguito è giunto il momento di mettere in prati¬ 
ca quanto appreso nella teoria. 

Questo assemblatore possiede delle caratteristiche che lo distin¬ 
guono da altri programmi dello stesso tipo: 

1) non sono necessarie le classiche LABELS (etichette), in quanto 
le istruzioni di salto relativo ed assoluto fanno riferimento diretta- 
mente annumeri di linea delle istruzioni, come in linguaggio BASIC; 


la, quindi fateci molta attenzione. 

Per quanto riguarda i codici mnemonici delle istruzioni, ci si deve ri¬ 
ferire a quelli riportati sul Databook Motorola. 

Tra le poche eccezioni compare la gestione degli STACKS (pile), 
per altro molto semplice. 

Le istruzioni PSHS, PSHU, PULS e PULU richiedono come operan¬ 
do una stringa di bit 1 e 0, che corrispondono agli 8 registri che si 
vogliono salvare nello stack. 

^- INSERIMENTO MIA ESTRAZIONE T I X>A 8 


PSHS/PULS 

PSHU/PULU 



PC 

u 

Y 

X 

DP 

B 

8 

CC 

PC 

s 

Y 

X 

DP 

B 

8 

cc 


2) non sono ammessi alcuni tipi di indirizzamento del 6809E. In par¬ 
ticolare, per quel che riguarda i modi di indirizzamento indicizzati, 
sono ammessi solo quelli “senza spiazzamento” e quello “autoin- 
crementante". 

Facciamo subito un esempio di come possa essere utilizzato un 
numero di linea in un’istruzione di salto. 

È necessario posporre al numero di linea l’operatore affinché 
questa possa essere indirizzata da un’istruzione di salto. 

Ad esempio: 

10 LDX 8000 
20: LDB ,X + 

30 TSTB 
40 BEQ 70 
50 SWI 2 
60 BRA 20 
70: RTS 

In questo caso le linee 20 e 70 sono utilizzate come labels. La man¬ 
canza del simbolo provoca la segnalazione di un errore in fase 
di assemblaggio. 

Sono previste tre direttive di assemblaggio: ORG, DFS e DFB. 

La prima definisce la locazione di memoria da cui si vuole che inizi 
il modulo assemblato, mentre le altre due permettono di riservare 
dello spazio in memoria per costanti di tipo stringa o semplicemen¬ 
te per un certo numero di byte. 

SINTASSI DEI COMANDI 

Tutti i valori numerici, esclusi i numeri di linea, vengono interpretati 
in notazione esadecimale e non c’è modo di cambiare questa rego¬ 


12345478 

L’ordine con cui vengono salvati i registri negli stacks è quello indi¬ 
cato in figura. 

Ad esempio, per salvare nello stacks i valori di S, PC, A e B occorre 
scrivere: 

130 PSHS 10000110 

e in modo analogo per l’operazione inversa PULS. Da notare che 
nello stack S non si può salvare direttamente il registro S e nello 
stack U non si può salvare il registro U. 

L’istruzione SWI, vista nell’esempio di prima, è una delle più potenti 
tra le istruzioni delle macchine microprogrammate. 

SWI sta per Software Interrupts, cioè “interruzione software’’, e si¬ 
mula una di quelle interruzioni che si possono verificare sull'appo¬ 
sita linea del microprocessore, con la conseguente esecuzione di 
un particolare sottoprogramma residente in ROM. 

Con la SWI è possibile gestire con facilità le periferiche del PC 128, 
come il video, la tastiera, il drive, ecc. 

La sintassi delle direttive DFS e DFB è la seguente: 

10 DFS "stringa" 

10 DFB >F0A0...F0A0F0A0 

Con DFB si possono riservare in memoria un certo numero di byte, 
caricandoli con i valori numerici specificati, mentre con DFS si ri¬ 
serva uno spazio che verrà occupato dalla stringa specificata. 

I COMANDI DIRETTI 

ASS: impartisce il comando di assemblare il programma 
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PROGRAMMI 


LIST: permette di visualizzare il listato del programma assembler e 
la sua sintassi è identica a quella dell’omonimo comando BASIC 
QUIT: serve ad uscire dal programma assemblatore e tornare al 
BASIC 

SAVE: salva il programma assembler e si usa con la sintassi SAVE 
nomefile.ASS 

LOAD: carica un programma assembler, permettendo l’eventuale 
fusione con un programma precedentemente caricato in memoria. 
La sintassi è identica a quella del comando SAVE 
NEW: elimina dalla memoria un programma o un modulo per far 
posto ad un altro programma 

EXEC: lancia un modulo in linguaggio macchina e va usato con la 
sintassi EXEC xxxx, dove l’indirizzo di partenza xxxx del modulo va 
specificato in notazione esadecimale. 

GII IDENTIFICATORI 

Gli identificatori principali sono il simbolo " ” per definire l’indirizza- 
mento immediato e il simbolo “<” per l’indirizzamento diretto (o con 
registro DP). L’indirizzamento esteso, invece, non richiede nessun 
tipo di identificatore. 


5 BANK 5:CLEAR 36000,&H9FFF:BANK 6::DEFI 
NT A-Z:DIM MATS(1500),MAT(1500) 

6 DEF FNHI(X!)=(X!+32768*(X!>32767))@256 
-(X!>32767)*128 

7 DEF FNLOCX!)=(X!+32768*(X!>32767))MOD 
256:EXE!=48963 

8 DIM ETIA! <30,30), RBGS(11):FOR 1=0 TO 1 
1: READ REGS<I):NEXT I 

9 FOR 1=0 TO 1500:MAT(I) = I+1:NEXT I :MAT( 
0)=-l:LPUNT=1 

10 DIM CODS(115),C0DC115),RIC<25) 

20 FOR 1=0 TO 115:READ CODS(I):NEXT I 
30 FOR 1=0 TO 115:READ COD(I):NEXT I 
40 FOR 1=0 TO 25:READ RICCI):NEXT I 
50 ON KEY=CHRS(131) GOTO 490:ON ERROR GO 
TO 9000 :GOSUB 7000 
60 DO: LINEINPUT ,,M , AXS: AXS=AXS+” ” 

70 IF VAL(AXS)=0 THEN 100 
80 GOSUB 500 
90 LOOP 

100 IF LEFTS(AXS,4)<>”LIST” THEN AXS=LEF 
TS(AXS,LEN(AX$)-1):GOTO 110 ELSE I=MAT(0 
) : Al = VAL (MIDS (AXS, 5) ) : AX= INSTR (AXS, ) : 
A2=VAL(MIDS(AXS,AX+1-4*(AX=0))) : A2=A2-VA 
L(MATS(PUNTL))*(A1=0 AND A2=0 OR A2=0 AN 
D AX>0) 

104 DO:IF I=-l THEN EXIT ELSE A=VAL(MATS 
(I)): IF A> = A1 AND A<=A2 THEN PRINT MATS( 
I) 

106 I=MAT(I): LOOP:GOTO490 
110 IF LEFTS (AXS, 4)=** SA VE'* THEN 0PEN”0”, 
1,MIDS(AXS,6): 1 = 0:DO: IF MAT(I)=-1 THEN P 
RINT#1,MATS(I):CLOSE:GOTO 490 ELSE PRINT 
#1,MATS(I) : I=MAT(I): LOOP 

120 IF LEFTS (AXS, 4 ) =” LOAD * 1 ’ THEN OPEN” I” , 
1,MIDSCAXS,6): DO: INPUT#1,AXS: IF NOT EOF( 
1) THEN GOSUB 500:LOOP ELSE GOSUB 500:CL 
OSE:GOTO 490 

130 IF AXS=”ASS” THEN GOSUB 5000:GOTO 49 
0 


Fate particolare attenzione a non confondere gli identificatori per¬ 
ché l’ASSEMBLER non sempre è in grado di riconoscere questo ti¬ 
po di errore e se il codice simbolico è sbagliato può succedere che 
il modulo in linguaggio macchina non sia del tutto corretto. 

A questo punto non ci resta che concludere con un esempio di pro¬ 
gramma assembler: 

10 ORG 4100 

20 DFS “ESEMPIO DI VISUALIZZAZIONE DI CARATTERI 
OTTENUTA PER MEZZO DELL’ISTRUZIONE SWI” 

30 ORG 4000 
40 LDA4100 
50: LDB ,X + 

60 TSTB 
70 BEO 100 
80 SWI 2 
90 BRA 50 
100: RTS 

Questo modulo, una volta assemblato con ASS e lanciato con 
EXEC 4000 da assembler o con EXEC &H4000 da BASIC, provoca la 
visualizzazione del messaggio contenuto nella linea 20. 


140 IF AX$=”QUIT” THEN EXEC &HDB6D 
150 IF AXS=”NEW” THEN DO:Y=MAT(0): IF Y=- 

1 THEN EXIT:ELSE AX$=MATS(Y): 1 = 0:GOSUB 5 
80:LOOP:GOTO 490 

160 IF LEFTS(AXS,4)=”EXEC” THEN A!=VAL(” 
&H”+MIDS(AXS,5)): EXE!=A!-EXE!*(A! =0): EXE 
C EXE!:PRINT:GOTO 490 
480 PRINT”VHAT? 

490 PRINT”READY” .-GOTO 90 
500 REM inserisci e togli dalla lista 
510 1=0:IF VAL(AXS)>VAL(MATS(PUNTL)) THE 
N I=PUNTL 

520 IF LEN(AXS)=LEN(STRS(VAL(AXS))) THEN 
580 

530 DO:IF MAT(I)=-1 THEN EXIT ELSE IF VA 
L(AXSXVAL(MATS(MAT(I))) THEN EXIT 
540 I=MAT(I)LOOP 

550 IF VAL(AXS)=VAL(MATS(I)) THEN MATS(I 
)=AXS ELSE MATS(LPUNT)=AXS:SVAP MAT(LPUN 
T),MAT(I):SVAP MAT(I),LPUNT 
560 IF MAT(I)>0 THEN IF MAT(MAT(I))=-l T 
HEN PUNTL=MAT(I) 

570 RETURN 

580 DO:IF MAT(I)=-1 THEN EXIT ELSE IF VA 
L(AXSX=VAL(MATS(MAT(I))) THEN EXIT 
590 I=MAT(I): LOOP 

600 IF VAL(AXS)=VAL(MATS(MAT(I))) THEN S 
VAP LPUNT, MAT(MAT(I)) : SVAP LPUNT,MAT(I) 
610 IF MAT(I)=-l THEN PUNTL=I 
620 RETURN 

1000 IF INSTR (AXS,”:”)>0 THEN GOSUB 360 
0* mette nella coda degli stacks 
1010 Xl=INSTR(AXS,” ”)+1:X2=INSTR(XI,AXS 
”):XS=MIDS(AXS,XI,X2-X1) 

1020 FOR I=RIC(ASC(XS)-65) TO 115:IF XS> 
CODS(I) THEN NEXT I 

1030 IF XS=CODS(I) THEN COD=COD(I) ELSE 
4000 

1040 CND=0:IF COD<&H80 THEN 1090 

1050 X3=INSTR(AXS,”<”):IF X3>0 THEN COD= 
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CND=4 

1080 GOTO 1120 

1090 X3= INSTR (AXS , ” , " ) : CND=-3* (X3> 0 ) : IF 
X3>0 THEN IF CODC&H1E THEN COD=COD OR &H 
60:GOTO 1120 ELSE 1120 

1100 X3=INSTR(AXS, ”<”>:IF X3>0 THEN CND= 
2:GOTO 1120 

1110 X3= I NSTR (AXS ,”#••>: IF C0D=&H1A OR CO 
D=&H1C OR COD <&H10 THEN IF X3=0 THEN CO 
D=COD OR &H70:CND=4 ELSE CND=1 ELSE IF X 
3 THEN ERROR 2 

1120 IF (XS=” ANDCC” ORXS=”ORCC” ) AND CNDOl 
THEN ERROR 2 

1130 FOR PC!=PC! TO PC!-(C0D>255):POKE P 
C!,COD0256-(C0D<256)*C0D MOD256:COD=COD 
MOD 256:NEXT PC! 

1140 IF CND THEN ON CND GOTO 1500,2000,2 
500,3000 

1150 IF(COD OR 3)=55 THEN 1200’gest pile 
1160 IF COD=60 OR COD=63 THEN POKE PC!,V 
AL < M &H”+MIDS(AXS,X2)): PC!=PC!+1:RETURN 
1170 IF(COD OR 7)=63 OR (COD OR 31)=95 O 
R (COD AND 240)=16 THEN RETURN 
1180 PCI!=-PC! : ETI=VAL(MIDS(AXS,X2)):GOS 
UB 3500 

1190 PC!=PC!+1:RETURN 
1200 REM gestione stacks 

1210 AS=MIDS(AXS, X2) : POKE PC!,VAL("AB”+A 

$): PC!=PC!+1:RETURN 

1500 REM indirizzamento immediato 

1510 OP!=VAL(”AH” +MI DS(AXS,X3 + 1)) 

1520 AS=RIGHTS(XS,1):IF AS>”R” OR AS=”D” 
THEN POKE PC!,FNHI(OP!):POKE PC!+1,FNLO( 
OP! ): PC!=PC!+2 ELSE POKE PC! ,OP! : PC!=PC! 
+ 1 

1530 RETURN 

2000 REM indirizzamento diretto 

2010 POKE PC! , VAL <** AH” +MIDS (AXS, X3 + 1 ) ) 

2020 PC!=PC!+1: RETURN 

2500 REM indirizzamento indexato 

2510 IF COD=30 OR COD=31 THEN 2700 

2520 AS=MIDS(AXS,X3+1, 1) 

2530 OP=132:IF AS=”Y" THEN OP=OP OR 32 E 
LSE IFAS=”U” THEN OP=OP OR 54 ELSE IF AS 
=”S M THEN OP=OP OR 96 

2540 IF MIDS(AXS,X3+2, 1 )=••+”THEN OP=OP-4 
2550 POKE PC!,OP:PC!=PC!+1:RETURN 
2700 REM istr. EXG , TFR 

2710 A1S=MIDS(AXS,X3-2,2> : A2S=MIDS(AXS,X 
3+1,2) 

2720 AS=A1S:GOSUB 2800:F1=F:AS=A2S:GOSUB 
2800:F2=F 

2730 POKE PC! ,Fl*16+F2: PC!=PC!+1: RETURN 

2800 FOR F=0 TO 11:IF INSTR( AS,REGS(F))= 

0 THEN NEXT F 

2810 IF F>11 THEN ERROR 2 

2820 RETURN 

3000 REM indirizzamento esteso 
3010 IF COD=126 OR C0D=189 THEN 3040 
3020 OP!=VÀL("AH"+MIDS(AXS, X2)) 

3030 POKE PC!,FNHI(OP!):POKE PC!+1,FNLO( 
OP! ): PC!=PC!+2:RETURN 

3040 PCI!=PC! : ET1=VAL(MIDS(AXS,X2)):GOSU 
B 3500:PC!=PC!+2:RETURN 
3500 REM Trattamento salti rei. e ass. 
3510 FOR 1 = 0 TO NETI.-IF ETI A! (1,0)=ETI T 
HEN ETIA! (I,2)=ETIA! (I,2)+l ELSE NEXT I: 


3620 ETIA! (I, 1)=PC! .-RETURN 

4000 REM direttive assembler 

4010 IF XS= M DFS” THEN AS=MIDS(AXS,INSTR( 

AXS,CHRS(34))+l):Q=LEN(AS):AS=LEFT$(AS,Q 

-1)+CHRS(0):FOR J=1 TO Q:POKE PC!+J-1,AS 

C(MIDS(AS,J,1)):NEXT J: PC!=PC!+Q+1: GOTO 

4900 

4020 IF XS= M DFB” THEN AS=MIDS(AXS, INSTR( 
AXS ,»•>»•) +1 ) j q=LEN ( AS ) : ÀS=LEFTS ( AS, Q-1 ) : 
FOR J = 0 TO Q/2 : POKE PC! +J , VAL (*• AH” +MIDS ( 
AS, 1+J *2,2)):NEXT J: PC!=PC!+Q/2: GOTO 490 
0 

4030 IF XS=”ORG M THEN PC! =VAL (” AH” +MIDS (A 
XS,X2)); GOTO 4900 
4890 ERROR 2 
4900 RETURN 

5000 REM assemblamento programma 
5010 NET 1 = 0:Y=MAT(0) : DO 
5020 IF Y=-l THEN EXIT 
5030 AXS=MAT$(Y):GOSUB 1000 
5040 Y=MAT(Y): LOOP 

5050 FOR 1 = 0 TO NETI : PC!=ETIA! (1,1):FOR 
Y=3 TO ETIA!(1,2) 

5060 PC1!=ETIA!(I,Y):IF PC1!>0 THEN POKB 
PCI!,FNHI(PC!):POKE PCI!+1,FNLO(PC!) EL 
SE PC2!=PC!+PC1!-1:POKE -PCI!,PC2!-256*( 
PC2!<0) 

5070 NEXT Y,I:RETURN 

7000 C0L0R7,0:SCREEN,,4:CLS:ATTRB0,1:LOC 
ATE,1:PRINT”ASSEMBLER v 1.0 - 1989”:ATTR 
BO,0:PRINT"By Giovanni Golino”: RETURN 
8000 DATA D, X, Y, U, S, PC, ' , ' , A, B, CC, DP 
8010 DATA ABX,ADCA,ADCB,ADDA,ADDB,ADDD, A 
NDA,ANDB,ANDCC,ASL,ASLA,ASLB,ASR,ASRA,AS 
RB, BCC, BCS, BEQ, BGE, BGT, BHI, BHS, BITA, BITB 
,BLE,BLO,BLS,BLT,BMI,BNE,BPL,BRA,BRN,BSR 
,BVC,BVS,CLR,CLRA,CLRB,CMPA,CMPB,CMPD, CM 
PS, CMPU, CMPX, CMPY,COM,COMA,COMB,CVAI,DAA 
, DEC 

8020 DATA DECA,DECB,EORA,EORB,EXG, INC, IN 
CA, INCB, JMP,JSR,LDA,LDB,LDD, LDS,LDU,LDX, 
LDY,LEAS,LEAU,LEAX,LEAY,LSL,LSLA,LSLB,LS 
R, LSRA, LSRB, MUL, NEG, NEGA, NEGB, NOP, ORA 
8030 DATA ORB,ORCC,PSHS,PSHU,PULS,PULU, R 
OL,ROLA,ROLB,ROR,RTI,RTS,SBCA,SBCB,SEX,S 
TA,STB,STD,STS,STU,STX,STY,SUBA,SUBB,SUB 
D, SVI,SYNC,TFR,TST,TSTA,TSTB 
8040 DATA 58,137,201,139,203,195,132,196 
,28,8,72,88,7,71,87,36,37,39,44,46,34,36 
,133,197,47,37,35,45,43,38,42,32,33,141, 
40,41,15,79,95,129,193,4227,4492,4483,14 
0,4236,3,67,83,60,25,10,74,90,136,200,30 
,12,76,92,14,157 

8050 DATA 134,198,204,4302,206,142,4238, 
50,51,48,49,8,72,88,4,68,84,61,0,64,80,1 
8,138,202,26,52,54,53,55,9,73,89,6,59,57 
,130,194,29,151,215,221,4319,223,159,425 
5,128,192,131,63,19,31,13,77,93 
8060 DATA 0,15,36,50,54,116,116,116,57, 
60,116,62,79,80,84,87,116,91,97,112,116, 
116,116,116,116,116 
9000 IF ERL=1020 THEN RÉSUMÉ 4000 
9005 IF ERL=5060 THEN PRINT ”Undefined 
line”ETIA! (I,0): RÉSUMÉ 60 
9010 CLOSE: PRINT”ERROR !!!••: IF ERL>999 T 
HEN PRINT”In 1ine”VAL(AXS)”:”:PRINT AXS 



COD OR AHI0 :CND=2:GOTO 1130 
1060 X3=INSTR(AXS,”,”):IF X3>0 THEN COD= 
(COD OR AH20)AND-17:CND=3: GOTO 1130 
1070 X3=INSTR(AXS,”#”):IF X3>0 THEN IF ( 
COD AND AH10)<>0 THEN ERROR 2 ELSE CND=1 
ELSE IF COD 0141 THEN COD=COD OR AH30: 


NETI = I:ETIA! (1,0)=ETI:ETIA! (I,2)=3 
3520 ETIA! (I.ETIA! (I,2))=PC1! .'RETURN 
3600 ETI=VAL(AXS) 

3610 FOR 1=0 TO NETI : IF ETIA! (1,0)=ETI T 
HEN ELSE NEXT I : NET1 = I : ETIA! (1,0)=ETI : ET 
IA!(I,2)=2 
















n Pinguino 


LS i tratta di un semplice e simpatico game, dove un pic¬ 
colo pinguino deve riuscire a scongelare tutti i cubi 
di ghiaccio sparsi a caso in una landa fredda e de¬ 
solata. L’ostacolo è rappresentato da alieni che si 
muovono a caso e che però possono pur sempre 
rappresentare un pericolo per il pinguino. Ciò vale soprattutto negli 
ultimi schemi. Infatti, gli alieni aumentano di numero proporzional¬ 
mente alla difficoltà dello schema; dieci in totale. 

Il gioco parte con un RUN, poi c’è il consueto demo e poi alla pres¬ 
sione del tasto ENTER ha inizio la partita. 

I tasti utilizzati per lo spostamento del pinguino sono le quattro 
frecce per il movimento del cursore. 

Il punteggio ovviamente inizia da zero e si incrementa ogni qualvol¬ 
ta si scioglie un cubo di ghiaccio (direzionarsi su di esso per tre vol¬ 
te successive) oppure quando si termina uno schema. 


IO REM XXXXXXXXXXXXXXXXXXXXXXXXXXX 
20 REM * IL PINGUINO * 

30 REM * Programma di Augusto * 

40 REM * Nieddu - Data: GEN 89 * 

50 REM XXXXXXXXXXXXXXXXXXXXXXXXXXX 
60 * 

70 REM * INIZIO * 

80 CLEAR:CLEAR400,,50 

90 FORN=0TO47:READX1,X2,X3,X4,X5,X6,X7,X 
8 : DEFGRS (N) =X8, X7, X6, X5, X4 , X3, X2, XI : NEXT 

N 

100 F0RN=1T012:READX1,X2,X3,X4,X5,X6:A$= 
CHRS<27)+CHR$<X5)+CHRS <27)+CHRS<X6)+GR$< 
XI> +GR$ <X2)+CHRS<8 > +CHRS <8)+CHRS <10)+GR$ 
<X3)+GR$ <X4) 

110 ONN GOSUB160,170,180,190,200,210,22< 

,230,240,250,260,270 
120 NEXT 

130 Ml$="05T5A5L5S0" : M2$="O5T2A0L24SI" 
140 F0RN=1T03:M3S=M3S+”T505L5D0PREPPMIPF 
APPSOPLAPPSIP M :NEXT:M3$="T10PPP"+M3S+”TI 
OPPP”: JUS«"TI0O3L24DOPDOPDGDOPMIREDO” 

150 PQKE8217,10:DIMS<19,10),A<14,2),G<40 

,3):GQT01340 

160 AF$=A$:RETURN 

170 ADS=AS:RETURN 

180 GI$=A$:RETURN 

190 PD$=A$:RETURN 

200 GLS=A$:RETURN 

210 GMS=AS:RETURN 

220 PSS=AS:RETURN 

230 PUS=AS:RETURN 

240 PTS=AS:RETURN 

250 AE$=AS:RETURN 

260 AGS=A$:RETURN 

270 VVS=AS:RETURN 

280 REM ** ARCHIVIO 1 

290 DATA 110,110,111,127,126,51,31,0 

300 DATA 118,18,246,254,126,204,248,0 

310 DATA 111,103,103,127,127,63.31,0 

320 DATA 246,230,230,254,254,252,248,0 

330 DATA 92,92,95,95,111,112,63,0 

340 DATA 58,58,250,250,246,14,252,0 


350 

DATA 

76,92,91,87,110,80,63, 0 

360 

DATA 

50,58,218,234,118,10,252,0 

370 

DATA 

0,60,60,14,15,15,111,111 

380 

DATA 

0,60,60,112,240,240,246,246 

390 

DATA 

0,60,60,14,15,15,111,111 

400 

DATA 

0,60,60,112,240,240,246,246 

410 

DATA 

0,63,112,111,95,95,92,92 

420 

DATA 

0,252,14,246,250,250,58,58 

430 

DATA 

0,63,80,110,87,91,92,76 

440 

DATA 

0,252,10,118,234,218,58,50 

450 

DATA 

119,119,123,63,63,24,15,0 

460 

DATA 

240,224,192,128,240,240,128,0 

470 

DATA 

15,7,3,1,15,15,1,0 

480 

DATA 

238,238,222,252,252,24,240,0 

490 

DATA 

55,55,59,31,31,15,7,0 

500 

DATA 

236,236,220,248,248,240,224,0 

510 

DATA 

55.55,62,28,31.9,15,0 

520 

DATA 

236,236,124,56,248,144,240,0 

530 

DATA 

30,12,8,31,63,119,111,111 

540 

DATA 

240,96,64,192,192,224,240,240 

550 

DATA 

15,6,2,3,3,7,15,15 

560 

DATA 

120,48,16,248,252,238,246,246 

570 

DATA 

30,12,4,15,15,47,55,55 

580 

DATA 

120,48,32,240,240,244,236,236 

590 

DATA 

30,12,4,15,15,47,55,55 

600 

DATA 

120,48,32,240,240,244,236,236 

610 

DATA 

108,111,111,127,127.49,31,0 

620 

DATA 

192,192,192,192,192,224,128,0 

630 

DATA 

3,3,3,3,3,7,1,0 

640 

DATA 

54,246,246,254,254,140,248,0 

650 

DATA 

72,80,72,85,106,80,63,0 

660 

DATA 

18,10,18,170,86,10,252,0 

670 

DATA 

0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 

680 

DATA 

0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 

690 

DATA 

0,60,24,16,127,111,111,108 

700 

DATA 

0,240,96,64,192,192,192,192 

710 

DATA 

0,15,6,2,3,3,3,3 

720 

DATA 

0,60,24,8,254,246,246,54 

730 

DATA 

0,63,80,106,85,72,80,72 

740 

DATA 

0,252,10,86,170,18,10,18 

750 

DATA 

0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 

760 

DATA 

0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 

770 

REM XX ARCHIVIO 2 

780 

DATA 

0,1,8,9,64,83 

790 

DATA 

2,3,10,11,64,83 

800 

DATA 

4,5,12,13,71,84 

810 

DATA 

16,17,24,25,68,82 

820 

DATA 

6,7,14,15,71,84 

830 

DATA 

36,37,44,45,71,84 

840 

DATA 

18,19,26,27,68,82 

850 

DATA 

20,21,28,29,68,82 

860 

DATA 

22,23,30,31,68,82 

870 

DATA 

32,33,40,41,64,83 

880 

DATA 

34,35,42,43,64,83 

890 

DATA 

38,39,46,47,64,83 

900 

REM XX schema 1 

910 

P0KE42944,185 

920 

NA=1 : 

SC= 0 :CX=10:CY=5:CG=0 

930 

GH=7 : 

SM=1:PX$=PU$:XA=0 

940 

REM XX MAIN 


96 


174 


LIST 6/89 






























950 GOSUB1550 

960 KS= INKEYS:IFK$= M ” THEN1010 

970 FX=CX:FY=CY:IFASC(KS)=8THENFX=FX+(FX 

<>0):PXS=PSS:GOT01740 

980 IFASC(KS)=9THENFX=FX-(FX<>19) : PXS=PD 
S:GOTO1740 

990 IFASC(KS)=11THENFY=FY+(FY<>0) : PXS=PU 
S: GOTO1740 

1000 IFASC <K$ ) =10THENFY=FY- (FYOIO) : PXS= 
PT$:GOTO1740 

1010 XA=XA+1: IFXA=NA+1 THENXA=1 
1020 GX=A (XA,1):GY=A(XA,2) 

1030 ON <INT (RND*4) +1 ) GOT01040,1060,1080 
, 1100 

1040 MX=GX:MY=GY: MX=MX+(MX<>0) : IFS(MX, MY 
)=0 THENAXS=AGS:GOTO1810 

1050 IFS(MX,MY)=3 THENAXS=AGS:FLAG=1:GOT 
01810 

1060 MX=GX:MY=GY: MX=MX-<MX<>19): IFS(MX,M 
Y)=0 THENAXS=AES:GOT01810 
1070 IFS(MX,MY) =3 THENAXS=AES:FLAG=1:GOT 
01810 

1080 MX=GX: MY=GY: MY=MY+(MY< >0): IFS(MX,MY 
> =0 THENAX$=AD$:GOTO1810 

1090 IFS(MX,MY> =3 THENAXS=ADS:FLAG=1:GOT 
01810 

1100 MX=GX: MY=GY: MY=MY- (MY<> 10) ; IFS(MX,M 
Y)=0 THENAX$=AFS:GOT01810 
1110 IFS<MX,MY)=3 THENAXS=AFS:FLAG=1 :GOT 
01810 

1120 GOTOIOIO 

1130 REM ** FINE SCHEMA-VITTORIA 

1140 ATTRB1,1:COLOR3,0:LOCATE9,13:PRINT” 

FINE SCHEMA”:ATTRBO,0 

1150 SC=SC+500:SM=SM+1 

1160 PLAYM3S 

1170 ONSM GOTO920,1190,1200,1210,1220,12 

30,1240,1250,1260,1270 

1180 REM ** DECIDE LA DIFFICOLTA’ 

1190 GH=9:NA=2:GOTO1280 
1200 GH=12:NA=4:GOTO1280 
1210 GH=15:NA=5:GOT01280 
1220 GH=19:NA=6:GOTO1280 
1230 GH=23:NA=8:GOTO1280 
1240 GH=26:NA=9:GOTO1280 
1250 GH=30:NA=12:GOTO1280 
1260 GH=35:NA=12:GOT01280 
1270 GH=40:NA=14: GOTO1280 
1280 CX=10:CY=5:CG=0 
1290 PXS=PUS:XA=0 
1300 GOTO940 

1310 REM ** FINE SCHEMA-PERDITA 

1320 ATTRB1,l:COLOR3,0:L0CATE9,13:PRINT” 

HAI PERSO”:ATTRBO,0 

1330 FLAG=0:PLAYM4S 

1340 REM ** BENVENUTO 

1350 POKE42944,169 :CLS:SCREENO,3,3 :LOCAT 
El,20:PRINT”CPremi il tasto ENT per gi 
ocare ... I” 

1360 ATTRB1,1:COLOR4,6 :LOCATE9,2 :PRINT”I 
L PINGUINO”:ATTRBO,0:LOCATE35,11:PRINTUS 
ING”&”; GIS 

1370 F0RN=2T011STEP2:LOCATEN, 11:PRINTUSI 
NG”&”; PDS 

1380 F0RM=1T014:IFINKEYS=CHRS(13) THEN90 
0 ELSENEXT 

1390 LOCATEN, 11: PRINTUSING”à” ; WS: PLAYM1 
S:NEXTN 

1400 F0RN=13T033STEP2:LOCATEN, 11:PRINTUS 
ING” &” ; PDS 

1410 LOCATEN-10,11:PRINTUSING”&”;AES 
1420 FORM=1T010:IFINKEYS=CHRS(13) THEN90 
0 ELSENEXT 

1430 LOCATEN, 11: PRINTUSING”&” ; WS: LOCATE 
N-10,11:PRINTVVS:PLAYM1S: NEXT 
1440 LOCATE33,11:PRINTUSING”à”; PDS:LOCAT 
E35,11:PRINTUSING”&”;GLS:L0CATE23,11:PRI 
NTUSING”&”;AES:PLAYM2S 

1450 FORM=lTO20:IFINKEYS=CHRS(13) THEN90 


0 ELSENEXT 

1460 LOCATE35,11:PRINTUSING”&” ; GMS: PLAYM 
2S 

1470 FORM=1T020:IFINKEYS=CHRS(13) THEN90 
0 ELSENEXT 

1480 LOCATE35, 11: PRINTUSING”&” ; WS: PLAYM 
2S 

1490 F0RN=23T031STEP2 

1500 LOCATEN,11 : PRINTUSING”&”;AES 

1510 F0RM=1T014:IFINKEYS=CHR$(13) THEN90 

0 ELSENEXT 

1520 LOCATEN, 11: PRINTUSING”&” ; WS: PLAYM1 
S:NEXT 

1530 L0CATE33, 11:PRINTUSING”à”;AES : PLAYM 
4$ 

1540 GOTO1340 

1550 REM ** PREDISPONE VIDEO 
1560 CLS:SCREEN7,4,4 

1570 FORM=0TO10:FORN=0TO19:S(N,M)=0:NEXT 
N, M 

1580 S <CX,CY)=3:FORN=1TOGH 

1590 X=INT(RND*19>:Y=INT(RND*10);IFS(X,Y 

> =0 THEN1600 ELSE1590 

1600 S(X, Y)=2:G(N,1)=X:G<N,2>=Y:G<N,3)=1 
: NEXT 

1610 F0RN=1T0NA 

1620 X=INT(RND*19>:Y=INT(RND*10) : IFS(X,Y 
)=0 THENS(X,Y)=l:A(N,1)=X:A (N,2)=Y ELSE1 
620 

1630 NEXTN 

1640 FORM=0TO10:FORN=0TO19:ONS(N,M)+1 GO 
SUB1700,1710,1720,1730 

1650 LOCATEN*2,M*2+2,0:PRINTUSING”&”;AS: 
NEXTN,M 

1660 COLORO,5:LOCATEO,1:PRINTCHRS<24); :L 
OCATEO,24:PRINTCHRS(24); 

1670 LOCATEO,0:PRINT”SCHEMA: ”+RIGHTS(”0 
0”+MIDS(STRS(SM),2),2):LOCATE25,0:PRINT” 
PUNTI : ”+RIGHTS<”0000”+MIDS(STRS(PT),2), 
4) 

1680 RETURN 

1690 REM ** STAMPA CARATTERI 

1700 AS=VVS:RETURN 

1710 AS=AFS:RETURN 

1720 AS=GIS:RETURN 

1730 AS=PUS:RETURN 

1740 REM ** MUOVE PINGUINO 

1750 IFS(FX,FY)=0 THEN1780 

1760 IFS(FX,FY)=1 THEN1310 

1770 IFS(FX,FY)=2 THEN1860 

1780 LOCATECX*2,CY*2+2:PRINTUSING”&”; WS 

1790 LOCATEFX*2,FY*2+2:PRINTUSING”&”;PXS 

:PLAYM1S 

1800 S(CX,CY)=0:CX=FX:CY=FY:S(CX,CY)=3:G 
OTOIO10 

1810 REM ** MUOVE ALIENO 

1820 L0CATEGX*2, GY*2+2 : PR INTUSI NG”&” ; WS 
1830 LOCATEMX*2,MY*2+2:PRINTUSING”&” ; AXS 
1840 IFFLAG=1 THEN1310 

1850 A(XA,1)=MX:A(XA,2)=MY:S(GX,GY)=0:S( 
MX,MY) = 1 : G0T0960 

1860 REM ** COLLISIONE CON GHIACCIO 
1870 F0RN=1T0GH 

1880 IFG(N,1)=FX ANDG(N,2)=FY THENEXIT 
1890 NEXT 

1900 IFG(N,3)=1 THENG(N,3)=2:A$=GLS:PT=P 
T+5:GOTO1930 

1910 IFG(N,3>=2 THENG(N,3)=3: AS=GMS:PT=P 
T+10:GOTO1930 

1920 IFG(N,3)=3 THENS(FX,FY>=0:AS=VVS:PT 
=PT+15:CG=CG+1 

1930 L0CATEFX*2,FY*2+2:PRINTUSING”&”;AS 
1940 LOCATECX*2,CY*2+2:PRINTUSING”&”;PXS 
1950 COLORO,5:LOCATE32,0:PRINTRIGHTS(”00 
00”+MIDS(STRS(PT) , 2) , 4) 

1960 IFCG=GH THEN1130 ELSEPLAYM2S:GOTOIO 
















PROGRAMMI 

Sistemi 

Il sogno di ogni pilota di rally è 

MSX 


quello di partecipare, e vincere, se possibile, il rally delle 



di MAURO MARINILLI 


UMPER 


uesto videogioco è la versione per MSX di un Arcade 
i che ha “spopolato" qualche anno fa: si chiamava 

I _ ■ BURNIN’ RUBBER e, nella versione console, BUMP’N 

■■■JV JUMP. 

Il gioco consiste nel guidare una jeep su una pista 
che si muove grazie ad uno scroll verticale, cercando di non farsi 
abbattere dai nemici, saltando l’acqua e i ponti interrotti. 

II programma si avvale di alcune routine in assembler sfruttate, ad 
esempio, per velocizzare lo scroll del video. 

Questa conversione ripropone tutti i particolari dell’arcade origina¬ 
le: il segnale (!) prima di ogni ponte, il BIP, il BONUS se non distrug¬ 
giamo neanche una macchina, la possibilità di schiacciare gli altri 
concorrenti semplicemente “atterrandovi" sopra con la nostra 
macchina. 

Le automobili degli avversari sono di tre tipi fondamentali: quelle 
piccole che, se urtate, sbandano allontanandosi in funzione della 
nostra velocità; quelle della “morte" (con lo scheletro e veloci) che 
ci fanno sbandare se le urtiamo; infine quelle giganti (tipo carro ar¬ 
mato...), che non si spostano se le colpiamo ma ci fanno slittare di 
parecchi metri. 

Le quattro stagioni sono identificate dalle differenti colorazioni che 
assumono il mare, la terra, i ponti ed il fondo stradale. 

Esiste poi un quinto e difficile quadro, che si svolge al buio. 
Superato questo livello, le stagioni si ripeteranno da capo, ma con 


Quattro Stagioni 


un incremento delle difficoltà. In particolare arrivati all’autunno, 
sulla strada appariranno degli scoglietti pericolosissimi, che con il 
trascorrere delle stagioni si moltiplicheranno. In inverno, addirittu¬ 
ra, i ponti saranno interrotti da pozze d’acqua: sarete obbligati a 
saltarli, pena l’esplosione della macchina. 

COMMENTO Al II STATO 

0-350: 

inizializzazione, runtime, animazione e richiamo USR dello scroll 
360-540: 

stampa dello scenario tramite uno speciale algoritmo generatore di 
scenari (attenzione! non random...) 

550-730: 

fine di un livello, calcolo bonus, ecc. 

Visualizza lo sprite di una macchina nemica sulla pista 

740-940: 

controlla la collisione di due auto, modificando eventualmente il 
punteggio 

950-1120: 

game over, presentazione, richiesta di pressione del fuoco per ini¬ 
ziare 

1130-1740: 

linee con i DATA, e corrispondente ciclo di lettura 


o ». 

ì • • 

2 * • B U M P E R ! 

3 * • 

4 * • 

5 '• DI MAURO MARINILLI <1988) 

6 ' • 

7 ’ • 

8 ’. 

9 • 

10 DEFUSR=àHCOOO:KEY1,"run20"+CHRS(13):S 
CREEN1,3:COLOR15,1,1:KEYOFF:WIDTH31:GOSU 
B1130:GOTO960 

20 J=0:BU=3:ST=0:LV=1:F8=l:XF=22:XX=4:DX 
= 1:VIDTH32 : VV=2: V=1 : S=1 : X=100: Y=100: 

30 CS <O)=”PRIMAVERA”: CS(1> =”ESTATE” : CS <2 
)=”AUTUNNO”:CS <3)=”INVERBO”:CS < O)=2 :CS <1 
)=9:CS(2)=12:CS(3>=14:GOSUB1040:GOSUB109 
O 

40 ON STRIG GOSUB320,320:STRIG(J)ON:ON S 
PRITE GOSUB74 O:SPRITEON 
50 PUTSPRITE1,(X,Y),15,S 

60 ON STICK<J) GOSUB220,240,250,260,270, 
290,300,310 

70 ’PUTSPRITE10+N, <X (N) , Y (N> > , C <N) , S (N) : 
Y(N)=Y(N)+DY(N): IFY<N)>172 THENS<N)=0:EL 
SEX <N)=X<N)+DX(N): IFVPEEK(6145+INT<Y<N)/ 
8>*32+INT<<X(N)+DX(N)>/8>>>142 THEN DX(N 


>=-DX(N):IF DY <N> <0 ANDVPEEK(6113+1NT(Y< 
N)/8> *32+1NT(X(N)/8))>142THENDY(N)=8 
80 A=A+1ANDA<3-V:IF A=1 THEN120 
90 KA=USR(0) 

100 GOSUB360 

110 PUTSPRITE10,(X1,Y1),Cl,SI:Y1=Y1+Y0:I 
FY1>178 OR <Y1<8ANDY0<0 )THENS1=0:ELSEX1= 
X1+X0:IFVPEEK(6145+INT(Yl/8)*32+INT((X1+ 
XO)/8)> >142 THEN XO=-XO: IF Y0<0 ANDVPEEK 
(6113+INT(Yl/8)*32+INT(Xl/8))>142THENY0= 
8 

120 IF FS=0 THEN 190 

130 SOUND2,S*20:SOUND9, S*2 

140 FF=FF+1:IFFF<VVTHEN 50 

150 FF=0:FS=FS-1: IF FS>4 THENS=S+1: GOTO 

50 

160 S=S-1:IF FS=0 THEN S=1:S0UND9,0:V=4 
170 IF FS=1 THENSPRITEON 
180 GOTO 50 

190 x Q=6210 +1NT(X/8) +1NT(Y/8)*32 : IFVPEEK( 
Q)>140 THEN GOSUB880 

200 SOUND9,6:SOUND3,14-V*2:SOUND2,RND(l) 
*10 

210 GOTO 50 

220 IF Y>48 THEN Y=Y-V:IF FS>0 THEN RETU 
RN 

230 Y2=-l:V=V+<1ANDV<4>:IF V=4 THENLOCAT 
E25,0:PRINT”JUMP OK”: RETURN ELSE RETURN 
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240 GOSUB220:GOTO250 

250 IF X<228 THENX=X+V:X2=l: RETURN ELSE 
RETURN 

260 GOSUB270:GOTO250 

270 IF Y<156 THEN Y=Y+VV:IF FS>0 THEN RE 
TURN 

280 Y2=l:V=V-<1ANDV>2):IF V<4 THENLOCATE 
25,0:PRINT” ”: RETURN ELSE RETURN 

290 GOSUB270:GOT0300 

300 IF X>4 THENX=X-V:X2=-l: RETURN ELSE 
RETURN 

310 GOSUB220:GOT0300 

320 IF FS>0 OR V<3THEN RETURN 

330 SPRITEOFF:V=4: FS=10 

340 S0UND9, 12:SOUND2,1 :SOUND3,1 

350 RETURN 

360 F9=F9+1: IF F9>32 AND AA=0 THENF9=0:G 
OTO 390 

370 IF S1 = 0AND RND ( 1 X . 4 THENX1=INT(RND( 
l)*214)+8:IFVPEEK(6209+1NT(Xl/8))<144 TH 
EN Yl=4:GOSUB690:Y0=8: ELSE IF S1=0AND V 
PEEK (6849+ I NT (Xl/8 ) X144 THENY1 = 174 : GOSU 
B690:Y0=-2 

380 ON F8 GOTO440,500 

390 IF F8=2 THENE=INT(PEEK(BY)/2): IF E/2 
<>INT(E/2) THEN F8=l : GOTO 380 ELSE IF R 
ND <1)<.2THEN 380 ELSE F8 = l:GOTO380 
400 BY=BY+1:IFPEEK(BY)<128THENF8=1 ELSE 
F8=2:F2=INT <RND( 1 )*20+1):F3=INT(RND<1)*4 
+4);F5=0 

410 BB=BB+1: IF BB>4+LV*2 THEN550 
420 IF XF>6 THENXF=XF-1 
430 GOTO 380 

440 F1=F1+1ANDF1<1:ON FI GOTO 470:IFRND< 
IX. 4THEN460 

450 XX=XX+DX:IFXX<10R XX>29-XF THENDX=-D 
X ELSE IF RND(-TIME)< . 4 THEN DX=-DX 
460 LOCATEO,1:PRINTSTRING$(32,160):LOCAT 
EXX,1:PRINT”«”STRING$(XF,128)”8”: RETURN 
470 LOCATEO,1:PRINTSTRING$(32,160):LOCAT 
EXX, 1: PRINT”É”STRINGA (XF, 128)”£” 

480 IF RND (IX. 2 AND LV>2 THENVPOKE6208+ 
XX+RND(1)*XF,160 
490 RETURN 

500 LOCATEO,1:PRINTSTRINGS(32,152) 

510 PUTSPRITE2,(224,1),15,10+AA:AA=AA+1A 
NDAA<1 :SOUNDIO,12*AA:SOUND5,0:SOUND4,90 

520 IFLV>3 ANDF5=0 AND F9>8ANDRND (IX. 2T 
HBNF5=1:RETURN 

530 LOCATEF2,1:PRINTSTRINGS(F3,136) 

540 RETURN 

550 ‘ FINE DI UN QUADRO 

560 S1=0:PUTSPRITE10,,,0:BEEP 

570 FORI=1T030: LOCATEO, 1: PRINT”à”STRING$ 

(30,128)”à”:KA=USR(0): IF I = 14THENLOCATE6 

,2:PRINT”CONGRATULAZIONI!” 

580 NEXT: 1 = 0 

590 PUTSPRITE1, (X,Y): 1 = 1 + 1: IF I>50 THEN6 
30 

600 IF X<24 THENX=X+1 ELSE X=X-1 
610 IF Y<34 THENY=Y+1 ELSE Y=Y-1 
620 GOTO 590 

630 LOCATE4,10:PRINT”MACCHINE DISTRUTTE: 
"MA: IF MA=0 THENSC=SC+50000! :PRINT:PRINT 
”àQCOMPLIMENTI! BONUS!”:ELSE PRINT:PRINT 
”àQBONUS=”LV*100”*”MA”=”LV*100*MA: SC=SC+ 
LV*100+MA 
640 MA=0 

650 BY=BY+6+LV*2: F9=0: F8=l: LV=LV+1: XF=22 
:XX=4:DX=1 

660 ST=ST +1ANDST < 4 :LOCATE2,6:PRINT”PROSS 
IMO QUADRO:”C$(ST) 


670 BB= 0:FOR1 = 1T06000:NEXT: X=100: Y=100: G 
OTO 30 
680 END 

690 X0=INT(RND(l)*6+2) : IF RND(-TIMEX.3 
THENX0=-X0:Sl=INT(RND(1)*3+1):IF RND(-TI 
MEX. 4 THEN Sl=9 
700 Xl=Xl-6 

710 IF RND ( 1X.4 THEN Cl=6 ELSE Cl=4 
720 IF RND(-TIME)< . 2 THENC1 = 1 
730 RETURN 
740 SPRITEOFF 

750 SOUNDO,100:SOUND1,41:SOUND8,16: SOUND 
7 , &B110000 : S0UND6,16 :S0UND12,6 :SOUND13,1 
:IF RND(-TIME)<.4 THENX0=-X0 
760 PUTSPRITE2,,,0 
770 IF FS=1 THEN850 

780 IF Sl=3 THEN830 ELSE IF Sl=9 THEN 82 
0 

790 X1=X1+(2*X2)*ABS(XO):Y1=Y1+(2*Y2)*AB 
S(Y0):PUTSPRITE10,(XI,Yl) 

800 IFVPEEK(6177+1NT((Y0+Yl)/8)*32+1NT(( 
XO+XD/8) )>142 THEN850 
810 GOTO 840 

820 X1=X1+(2*X2 ) *ABS(XO ) :Y1=Y1+(2*Y2)*AB 
S ( YO ) :PUTSPRITE10,(XI,Yl) 

830 X=X-ABS(V)*2*X2:Y=Y-(Y2*ABS(V)):PUTS 
PRI TEI, (X,Y) 

840 SPRITEON:RETURN 

850 S0UND9,0:SOUNDIO,0:SOUNDO,240:SOUND1 
,255:S0UND8,16 :SOUND7,&B110000 : S0UND6, 19 
:SOUND12,46 :SOUND13,1:FORI = 1T014:PUTSPRI 
TEI0,(Xl-3+RND(l)*6,Y1-4+RND(1)*8),RND(1 
)*14+1,7+KA:KA=AA+1ANDKA<1:NEXT 

860 MA=MA+1: SC=SC+10*S1:LOCATE6,0:PRINTS 

C:PUTSPRITE10,,,0:S1=0 

870 SPRITEON:RETURN 

880 'esplosione macchina 

890 SOUND9,0:SOUNDIO,0:SOUNDO,100:SOUND1 
,41:S0UND8,16:SOUND7,&B110001:SOUND6,11: 
SOUND12,56:SOUND13,1: 

900 FOR1=1 TO20:PUTSPRITE1,(X-8+RND(1)*1 
6,Y-8 + RND(1 ) *16),1+RND(1 ) *14,7+RND(1)*2 : 
NEXT 

910 BU=BU-1: IF BU=0 THEN 940 
920 X=XX*8+32:Y=60:FS=10 
930 RETURN 

940 FORI=0TO31:PUTSPRITEI,,,0:NEXT:CLS:F 
ORI=0TO30:KA=USR(0):NEXT 

950 STRIG(J)OFF:SPRITEOFF:L0CATE5, 10: PRI 
NT”àààÀààà£éiààààààààààà” : LOCATE5 : PRINT”à 
GAME OVER ét” : LOCATE5 : PR I NT” àààéiéL 

960 IF STRIG(J) THEN RUN20 

970 GOTO 960 

980 GOTO 980 

990 * presentazione 

1000 SCREEN3:FOR1=4 TO 24STEP8:CIRCLE(12 
8,100),128-1,1/6,,,.6:PAINT(128,100),14, 
1/6:NEXT 

1002 OPEN”GRP:”AS#1:PSET(42,90),14:PRINT 
#1,”BUMPER” 

1010 FORI = OT032:VDP(7)=RND(1)*32:NEXT: VD 
P (7)=1 

1020 COLORI5:RETURN 
1030 GOTO 1030 
1040 * assegna colori 
1050 C=CS(STA) 

1060 VPOKE8208,16*C+C:VPOKE8210,16*6+C:V 
POKE8211,16*7+5:VPOKE8212,16*6+9 :VPOKE82 
09,16*15+14:VPOKE8214,16*1+C 
1070 IF ST=1 THENVPOKE8211,16*4+7 ELSE I 
F ST=3 THENVPOKE8211,16*7+14 :VPOKE8210,1 
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6*13+C:VP0KE8212,16*13+6:VPOKE8209,16*1+ 
14 

1080 RETURN 

1090 CLS:FORI = 1T023:LOCATEO, I :PRINTSTRIN 
GS (30,128); :NEXT:FORI=6176TO6880STEP32: V 
POKEI,160:VPOKEI+1,160:VPOKEI+30,160:VPO 
KEI+31,160:NEXT 

1100 LOCATEO,0:PRI NT”PUNTI :'»SCTAB< 15 > ”QU 
ADRO:»» RIGHTS(STRS(LV),LENCSTRS(LV))-l) 
1110 RETURN 

1120 FORI=0TO31:PUTSPRITEI,,0,0:NEXT:VID 
TH31: END 

1130 GOSUB990:FORE=1T010:F0RI = 1T032: READ 
U:S$=S$+CHR$ <U>:NEXT:SPRITE$(E)=S$:S$=**»’ 

: NEXT 

1140 SCREEN1 

1150 LOCATE2,8:PRINT"<C) 1988 BY MAURO M 
ARINILLI” 

1160 FORI=144*8 T0148*8-l:READU:VPOKEI, U 
: NEXT 

1170 FORI=152*8 T0153*8-1:READU:VPOKEI,U 
: NEXT 

1180 FOR1=160*8 T0161*8-1:READU:VPOKEI,U 
: NEXT 

1190 FOR1=136*8 T0137*8-1:READU:VPOKEI,U 
: NEXT 

1200 FORI=176*8 T0177*8-1:READU:VPOKEI,U 
: NEXT 

1210 RESTORE1390:FOR1=49152! TO 49717!:R 
EADU:POKEI,U:NEXT:*49710 BYTE DEL RINFRE 
SCO 

1220 VPOKE8208,16*13+13:FORI=0TO30:KA=US 
R(0):IFI=18 THENLOCATE3,1:PRINT”PREMI FU 
OCO PER INIZIARE” 

1230 NEXT 
1240 RETURN 

1250 DATA 0,0,0,0,0,0,1,5,7,5,3,11,15,11 
,1,0,0,0,0,0,0,0,128,160,224,160,192,208 
,240,208,128,0 

1260 DATA 0,0,0,0,0,0,1,5,7,7,5,11,15,11 
,11,0,0,0,0,0,0,0,128,160,224,224,160,20 
8,240,208,208,0 

1270 DATA 0,0,0,0,0,1,5,7,15,13,5,11,31, 
31,11,1,0,0,0,0,0,128,160,224,240,176,16 
0,208,248,248,208,128 

1280 DATA 0,0,0,0,1,3,5,13,15,13,3,11,31 

,31,31,11,0,0,0,0,128,192,160,176,240,17 

6,192,208,248,248,248,208 

1290 DATA 0,0,0,1,1,5,13,31,31,13,3,27,6 

3,63,63,27,0,0,0,128,128,160,176,248,248 

,176,192,216,252,252,252,216 

1300 DATA 0,0,3,1,13,27,31,29,9,3,55,55, 

107,127,55,59,0,0,192,128,176,216,248,18 

4,144,192,236,236,214,254,236,220 

1310 DATA 8,64,17,0,4,128,4,16,2,8,64,2, 

16,65,8,0,64,16,4,0,144,4,64,18,64,0,132 

,32,2,8,64,16 

1320 DATA 0,8,65,16,2,64,8,2,16,4,128,4, 
0,17,64,8,16,64,8,2,32,132,0,64,18,64,4, 
144,0,4,16,64 

1330 DATA 0,0,0,3,7,5,7,11,14,11,1,11,14 
,8.0.0,0,0,0,128,192,64,192,160,224,160, 
0,160,224,32,0,0 

1340 DATA 1,3,3,11,19,19,35,67,65,32,19, 
9,4,2,1,0,0,128,128,160,144,144,136,132, 
4,8,144,32,64,128,0,0 

1350 DATA224,248,252,254,255,254,252,224 
, 128,192,224,240,248,240,224,128, 7,31, 
63,127,255,127,63,7, 1,3,7,15,31,15,7,3 
1360 DATA64,2,0,0,0,8,128,1 
1370 DATA255,223,255,253,127,255,247,255 
1380 DATA8,8,8,0,8,8,8,0 ,61,123,223,125 


,126,191,123,60 

1390 DATAI,32,0,17,104,191,33,32,24,205, 
89,0,1,32,0,17:• 49168 

1400 DATA32,24,33,144,191,205,92,0,1,32, 
0,17,184,191,33,64:* 49184 
1410 DATA24,205,89,0,1,32,0,17,64,24,33, 
104,191,205,92,0:* 49200 

1420 DATAI,32,0,17,104,191,33,96,24,205, 
89,0,1,32,0,17:• 49216 

1430 DATA96,24,33,184,191,205,92,0,1,32, 

0,17,184,191,33,128:* 49232 

1440 DATA24,205,89,0,1,32,0,17,128,24,33 

,104,191,205,92,0:» 49248 

1450 DATAI,32,0,17,104,191,33,160,24,205 

,89,0,1,32,0,17:» 49264 

1460 DATA160,24,33,184,191,205,92,0,1,32 

,0,17,184,191,33,192:» 49280 

1470 DATA24,205,89,0,1,32,0,17,192,24,33 

,104,191,205,92,0:» 49296 

1480 DATAI,32,0,17,104,191,33,224,24,205 

,89,0,1,32,0,17:» 49312 

1490 DATA224,24,33,184,191,205,92,0,1,32 
,0,17,184,191,33,0:*Z49328 
1500 DATA25,205,89,0,1,32,0,17,0,25,33,1 
04,191,205,92:» 49343 

1510 DATAO,1,32,0,17,104,191,33,32,25,20 
5,89,0,1,32,0: » 49359 

1520 DATA17,32,25,33,184,191,205,92,0,1, 

32,0,17,184,191,33:» 49375 

1530 DATA64,25,205,89,0,1,32,0,17,64,25, 

33,104,191,205,92:» 49391 

1540 DATAO,1,32,0,17,104,191,33,96,25,20 

5,89,0,1,32,0:» 49407 

1550 DATA17,96,25,33,184,191,205,92,0,1, 

32,0,17,184,191,33:» 49423 

1560 DATA128,25,205,89,0,1,32,0,17,128,2 

5,33,104,191,205,92:» 49439 

1570 DATAO,1,32,0,17,104,191,33,160,25,2 

05,89,0,1,32,0:» 49455 

1580 DATA17,160,25,33,184,191,205,92,0,1 

,32,0,17,184,191,33:» 49471 

1590 DATA192,25,205,89,0,1,32,0,17,192,2 

5,33,104,191,205,92:» 49487 

1600 DATAO,1,32,0,17,104,191,33,224,25,2 

05,89,0,1,32,0:»Z49503 

1610 DATAO,17,224,25,33,184,191,205,92,0 
,1,32,0,17,184,191:» 49518 
1620 DATA33,0,26,205,89,0,1,32,0,17,0,26 
,33,104,191,205:» 49534 

1630 DATA92,0,1,32,0,17,104,191,33,32,26 
,205,89,0,1,32: 1 49550 

1640 DATAO,17,32,26,33,184,191,205,92,0, 

1,32,0,17,184,191:» 49566 

1650 DATA33,64,26,205,89,0,1,32, 0, 17,64, 

26,33,104,191,205:* 49582 

1660 DATA92,0,1,32,0,17,104,191,33,96,26 

,205,89,0,1,32:» 49598 

1670 DATAO,17,96,26,33,184,191,205,92,0, 

1,32,0,17,184,191:* 49614 

1680 DATA33,128,26,205,89,0,1,32,0,17,12 

8,26,33,104,191,205:» 49630 

1690 DATA92,0,1,32,0,17,104,191,33,160,2 

6,205,89,0,1,32 : » 49646 

1700 DATAO,17,160,26,33,184,191,205,92,0 

,1,32,0,17,184,191: » 49662 

1710 DATA33,192,26,205,89,0,1,32,0,17,19 

2,26,33,104,191,205:»Z49678 

1720 DATA92,0,1,32,0,17,104,191,33,224,2 

6,205,89,0,1:» 49693 

1730 DATA32,0,17,224,26,33,184,191,205,9 

2,0,175,33,144,191,54:* 49709 

1740 DATA128,35,60,254,32,56,248,201 
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Sistemi 

MSX 


Il protagonista di questo simpatico 


gioco si chiama Osvaldo, ma ogni riferimento a collaboratori di 
di MAURO MARI NULI LIST è puramente casuale ... 


THE MAD CuMBER 


svaldo abita in uno di quegli enormi grattacieli italia¬ 
ni, dove al posto dei vetri e dell’acciaio ci sono tanti 
mattoncini rossi. Stasera c’è la partita desordio del¬ 
l’Italia nel campionato del mondo di calcio e tutta la 
nazione è seduta davanti ai televisori. 

Ma, purtroppo per Osvaldo, il vento ha piegato le antenne del grat¬ 
tacielo ed inoltre, a differenza dei suoi coinquilini, è sprovvisto di 
un’antennina portatile. 

Per luLnon c’è che una soluzione: arrivare fino in cima al grattacie¬ 
lo e riparare l’antenna. 

Eccolo quindi, dopo essersi equipaggiato con l’attrezzatura alpini¬ 
stica, pronto a partire per la folle impresa. 

Si affaccia alla finestra del suo appartamento, inghiotte con deter¬ 
minazione ed in lui c’è qualcosa di Livingstone o di Messner, la sfi¬ 
da dell’uomo contro tutto per il traguardo finale: la partita dell’Ita¬ 
lia! 

L’impresa non si preannuncia facile: le mogli dei suoi vicini, scoc¬ 
ciate dalla partita, decidono di svolgere le faccende casalinghe, 
spolverando tutta la casa, stendendo i panni alla finestra e batten¬ 
do i tappeti al davanzale. 

Ma il nostro eroe non si scoraggia: salirà fino in cima. 

Non appena Osvaldo arriva ad una certa altezza scoppia un puti¬ 
ferio: viene a mancare la corrente ed esplodono liti furibonde nelle 
famiglie del palazzo, dove mariti e figli accusano rispettivamente 
mogli e sorelle di aver volontariamente boicottato la partita. 
Cominciano a volare dalle finestre vasi di fiori, bottiglie ed addirittu¬ 
ra televisori! 

Insomma, scoppia una specie di guerra civile e chi ne subisce le 
conseguenze è sempre lui: il nostro scalatore folle. 

Se Osvaldo riuscirà ad arrivare in cima al grattacielo riceverà il re¬ 
lativo BONUS aggiuntivo, congratulazioni da tutti i condomini che 
lo proclameranno eroe del palazzo ed una targa-premio dall'am¬ 
ministratore che gli condonerà addirittura il pagamento dell’affitto! 


CONSIGLI STRATEGICI 

Quando vedete una finestra con le persiane, statene alla larga: se 
qualcuno la apre sono traumi da ospedale! 

Lo stesso vale quando, più in alto, cominceranno a stendere i tap- 


o ’ xxxx>^^ 

1 ’X X 

2 • XTHE MAD CLIMBERX 

3 ’X X 

4 ’XDI MAURO MARINILLI <1989>X 

5 ’X X 

6 ’X PER LE EDIZIONI «LIST». X 

7 ’X X 

8 ’ XXXXXXXXXXXXXXXXXXXXXXXXX^ 

9 .- 

10 DEFUSR=&HCOOO :SCREEN1,3 :C0L0R15,1,1:K 
EYOFF: VIDTH32:KEY1,”RUN2”+CHRS <13):GOSUB 
940 

20 BEEP:DIMT<12>:VIDTH32:V=2: OM=2 
30 X=100:Y=100:MT=999:Cl=6:C2=10:G0SUB86 
0:T <8>=2:T <9>=24:T(10)=24:T(ll>=2; IFPEEK 
(60000!)=1THENMT=500 

40 GOSUB340:ON INTERVAL=130 GOSUB 330:IN 
TERVALON 

50 PUTSPRITE10,(X,Y>,15,1+A:IFKA=2 THENG 
OSUB140:KA=USR(0): IFMT= OTHENPRINT”FINE P 
ALAZZO”: STOP 

60 IF STICK(J)>OTHENSOUND9,8+A:S0UND2,RN 
D(l)*100+100:S0UND3,40:A=A+1ANDA<1:ONSTI 
CK(J)GOSUB240,250,260,270,280,290,300,31 
0 ELSE S0UND9,0 

70 Q=6177+1NT(X/8)+ INT(Y/8)*32:IFVPEEK(Q 
)>1290R VPEEK(Q+64)>129 ORVPEEK(Q+2)>129 
ORVPEEK(Q+66)>129 THEN380 
80 V0=6566+9*INT(RND(1)*3): IFVPEEK(VO)=1 
52ANDVPEEK(VO+32)=129 THEN GOSUB610 
90 IF RND(-TIME)<4 AND SP=0 AND MT<500 T 
HENVP=INT(RND( 1 )*6+2):XP=X-8+RND(1> *16 :Y 
P=-32:CP=INT(RND(1)*4 +1 ):SP=7+INT(RND(1) 
*4+1):SOUND5,RND(1)*3+1 
100 IF SP=0 THEN50 

110 SOUNDIO,10:SOUND4,ABS(YP):PUTSPRITE5 
,(XP,YP),CP,SP:YP=YP+VP:IFYP>184 THENPUT 
SPRITE5,,,0:SP=0:SOUNDIO,0 



LIST 6/89 


179 


101 
















peti: fate attenzione, perché sono causa di scivoloni. 

Se riuscite ad arrivare a 500 metri cercate di muovervi continua- 
mente altrimenti verrete colpiti da televisori e oggetti vari. 

Quando arrivate al GAME OVER è possibile scegliere se partire da 
999 o da 500 metri. Come? Beh, provate a capirlo da soli... 

Un altro piccolo accorgimento: quando venite colpiti da un oggetto 
e precipitate da altezze molto elevate, la caduta potrebbe conti¬ 
nuare per qualche minuto e la cosa non è piacevole. 

Premete RETURN per farla finita! 

La variabile J che controlla lo STICK non è inizializzata: questo per 
attribuirle il valore zero ed essere utilizzata con la tastiera da chi 
abbia un MSX senza joystick. 

Per chi volesse usare lo stick allora porre J = 1 all’inizio della linea 
20 . 

È anche possibile modificare l’altezza del palazzo per arrivare pri¬ 
ma, oppure lo step con cui i metri diminuiscono (il valore di default 
è molto, molto lento). 

Da notare che sia i televisori che le lavatrici lanciate dagli inquilini 
hanno un certo margine di "bontà”, nel senso che se il contatto av¬ 
viene di striscio la collisione non sarà individuata. 

Notiamo infine la variabile OM, che contiene il numero degli omini 
ancora disponibili, visualizzato in alto a sinistra sullo schermo. 


COMMENTO Al II STATO 

0-130:inizializzazione, runtime e disegno della schermata iniziale 
(primo piano) 

140-190: 

stampa delle finestre del condominio (chiuse o aperte) 

200-310: 

inserimento nella memoria (per la routine in linguaggio macchina 
dello scroll) delle finestre, movimento dell’omino 

320-590: 

suono del motivetto con INTERVAL, animazione della caduta del¬ 
l'omino, se hai finito gli omini GAME OVER 

600-850: 

animazione di un inquilino che spalanca le persiane a due ante, e 
nel caso tu sia li vicino verrai schiacciato! 

Animazione dell’arrivo alla meta 

860-930: 

inizializzazione dello schermo e dei colori 
940-1040: 

lettura dei DATA e presentazione grafica 
1050-1530: 

DATA per la grafica, per le routine in LM, ecc. 


120 IF XP+T(SP)>XANDXP-16<X AND YP+24>Y 
AND YP-20<Y THEN 420 
130 GOTO 50 

140 IF F9>OTHENLOCATEF9,1:PRINT”yyVV”:F8 
=F8+1:IFF8=3THENF8=0 :F9=0:GG=7 
150 IF RND(-TIME)<.4 THENIFF1=2THENF9=2+ 
9*INT(RND(1)*2) ELSE IF Fl=10THENF9=6+9* 
INT(RND <1)*2 ) 

160 IF F9>O AND F9<24 ANDF8>1 AND RNDC-T 
IMEX.2 THENPUTSPRITE9, ((F9+9)*8,GG) ,9,6 
:FORI = 1T04 : LOCATEF9 + 9, 2+ I :PRINT”éèéé”: NE 
XT: 

170 MO=MO+l:SC=SC+1:LOCATE6,O:PRINTSC:IF 
M0>3 THENMO=0:MT=MT-1:PUTSPRITE9,,,O:SC= 
SC+2:L0CATE6,O:PRINTSC: IFMT=0THEN710 
180 F1=F1+1ANDF1<16 :LOCATE25,O:PRINTMT”m 
” : ON FI GOTO190,210,200,200,200, 190,190, 
190,190,220,230,230,230,190,190,190 
190 .-RETURN 

200 FORI=49042!T049060!STEP9:POKE1, 144: P 
OKEI+1,144:POKE1+2,144:POKE1+3,144:NEXT: 
RETURN 

210 FORI=49042!T049060!STEP9:FuKEI,129:P 
OKEI+1,129:POKE1+2,129:POKE1+3,129:NEXT: 
RETURN 

220 FORI=49046!T049084!STEP9:POKEI, 129: P 
OKEI+1,129:POKEI+2,129:POKEI+3,129:NEXT: 
RETURN 

230 FORI=49046!T049084!STEP9 : POKE1, 144; P 
OKEI+1,144:POKE1+2,144:POKE1+3,144:NEXT: 
RETURN 

240 KA=KA+1:IFY>80THENY=Y-V:RETURN ELSE 
RETURN 

250 GOSUB240:GOT0260 

260 X=X+V:IF X>232 THEN380 ELSE RETURN 
270 GOSUB280:GOTO260 

280 Y=Y+V: IF Y>168 THEN380: RETURN ELSE R 
ETURN 

290 GOSUB28 0 :G0T03 0 0 

300 X=X-V:IF X<-4 THEN380 ELSE RETURN 
310 GOSUB24 0 :G0T03 0 0 
320 * SUONO MOTIVETTO 

330 MM=MM+1ANDMM<3: ONMM GOT0350,360,370 
340 PLAY'*T90S8M1450L805E04G05E04G05D04GO 
5G”: RETURN 

350 PLAY”T90S8M1450L805C04EBE05E”: RETURN 
360 PLAY”T90S8M1450L804ACACGC05C”: RETURN 
370 PLAY”T90S8M1400L8O5EO4GO5EO4GO5DO4GO 
5D”: RETURN 
380 * SEI CADUTO! 

390 BEEP: INTERVALOFF:SOUND9, 14 
400 PUTSPRITE9, , , 0 

410 F0RI=1T018:A=A+1ANDA<2:PUTSPRITE10, < 
X-2+RND<1)*4,Y-4+RND(1)*8), , 1+A:SOUND3,4 
+RND<1)*3:S0UND9,6+A*2:NEXT 
420 INTERVALOFF:FORI = 1T010:A=A+1ANDA<1 : P 
UTSPRITEI0,(X,Y),,2+A:SOUND3,1+RND<1>*3: 
SOUND9,8+A*2:BEEP:NEXT 
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PROGRAMMI 


430 H1=0:H=100;HG=.1:ZO=l 

440 IFUU=0THENIFY<160 THENY=Y+4 

450 PUTSPRITE10, (X,Y),15,3+A:S0UND9,14:S 

OUND3,HI:S0UND2,H:H=H+1:IFH>255 THENH1=H 

1+1:H=0 

460 IF Y>42+RND <1)*24THENA=ZO: IFH>120AND 
RND ( 1 )<HGTHENZO=ZO+lANDZO<1:A=ZO:HG=HG+ 
02 

470 IF SP>0 THEN PUTSPRITE5,(XP,YP):YP=Y 
P-8: IFYP<-30 THENSP=0:PUTSPRITE5, , , 0 
480 IF MT<999 THENLOCATEO,23 :PRINTSTRING 
$ (32,128); :MT=MT+1: IFMT=999 THENUU=1 
490 LOCATEO, 0: PRINT”PUNTI : ”SCTAB(20)”MET 
A: M MT 

500 IFUU=lTHENY=Y+2:IF Y>180 THEN SOUND8 
,16 :SOUND12,5:SOUND7,247:S0UND6,20: SOUND 
13,1 :GOTO530 

510 IF INKEY$=CHR$(13)THEN530 
520 GOTO 440 

530 OM=OM-l: IFOMCO THEN560 

540 LOCATEO,0:PRINT” O O © FORZA E CORA 

GGIO Q Q © ” : FORI = 1T010: BEEP: FORE=1T010 

0:NEXT:NEXT: IFPEEK(60000!)=1THENMT=500 E 

LSE MT=999 

550 GOSUB860:GOTO30 

560 BEEP:LOCATE7,8:PRINTSTRINGS(17,32):L 
OCATE7:PRINT” THE % END ”:LOCATE7: 
PRINTSTRINGS(17,32) 

570 IF STRIGO ) THEN POKE60000! , 0: RUN20 
580 IF STICK(J) THEN POKE60000!,1:RUN20 
590 GOTO570 
600 END 

610 * UN INQUILINO APRE LA FINESTRA 
620 V0=V0-32*2:FORE=0TO2:FORI=V0TQV0+3: V 
POKEI+32*E,144:NEXT:NEXT:IF V0=6566 THEN 
ZX=48:ZY=88 

630 IF V0=6511 THENZX=120:ZY=88 

640 IF V0=6502 THENZX=46:ZY=88 

650 PUTSPRITE4, (ZX,ZY),15,5 

660 F0RI=1T016:PUTSPRITE1,(ZX-I,ZY),4,7 : 

PUTSPRITE2,(ZX+16+I,ZY),4,7:NEXT 

670 VPOKEVO-2,152:VPOKEVO-1,152 :VPOKEVO + 

30,152:VPOKEVO+31,152:VPOKEVO+4,152:VPOK 

EVO+5, 152: VPOKEVO+36, 152: VPOKEVO+37, 152: 

VPOKEVO+62,152:VPOKEVO+63,152:VPOKEVO+68 

,152:VPOKEVO+69,152 

680 FORI=1T06:PUTSPRITEI,(0,-32),,0:NEXT 
690 RETURN 
700 GOTO 700 

710 » EVVIVA ! SEI ARRIVATO !! 

720 INTERVALOFF:BEEP:PUTSPRITE9,,,0:PUTS 
PRITE5,,,0 

730 SOUND8,14 :FORI = 0TO255:SOUNDO, I : SOUND 
1,1:NEXT 

740 SOUND8,14 : FORI=0TO255:SOUNDO, 255-I : S 
OUND1,1:NEXT:BEEP 

750 SOUND8,15: FORI=50T0255STEP8:SOUNDO, I 
:SOUND1,1:F0RE=1T0RND(1)*100:NEXT:NEXT:B 


EEP 

760 KA=USR(0):KA=USR(0):F0RE=1T012:FORI= 

49040!T049072! :POKEI,32:NEXT:KA=USR(0):P 

UTSPRITE10,,,1+A:A=A+1ANDA<1:NEXT 

770 FORI=YT060STEP-1:PUTSPRITE10,(X,I),1 

5,1:FORE=1T05:NEXT:NEXT:Y=I 

780 F0RI=YT074:PUTSPRITE10,(X,I),15,3:FO 

RE=1T05:NEXT:NEXT: 

790 FORI = 1T01000: NEXT: 

800 FORE=1T02:F0RI = 1T0124:FORU=1T050: NEX 
T 

810 LOCATEO,1:PRINTMIDS(STRINGS(32,32)+” 
CONGRATULAZIONI ! EVVIVA !! BONUS PUNTI: 
10000 ! EVVIVA ! ORA PROVA A SCALARNE 
UN’ALTRO ! ”, 1,32):NEXT 
820 BEEP:NEXT 
830 SC=SC+5000 

84 0 SOUND8, 15 :FORI=50T0165STEP8:SOUNDO, I 
:SOUND1, 178-1 :FORE=1TORND(1)*100:NEXT:NE 
XT:BEEP:BEEP:BEEP: PLAY”V12L12N40” 

850 GOSUB860:GOTO30 

860 VPOKE8208,16*C1+C2:VPOKE8209,16*9+13 
:VPOKE8210,16*7+7:VPOKE8211,16*4+4 
870 ’ dati per iniziare 

880 PRINT:FORI=1T022:PRINTSTRINGS(32,128 
); :NEXT: IF PEEK(60000! >=OTHENFORI=6880TO 
6880+32:VPOKE1,219:NEXT 
890 Fl=6 

900 YP=0:F9=0 :F8=0:FORI=0TO20:PUTSPRITEI 


,(0,-32),0,0:NEXT 


910 IF OM>OTHENFORI=1TOOM:PUTSPRITE15+I, 
(244+1*16,16),15,12:NEXT 

920 LOCATEO,0:PRINT”PUNTI : ”SCTAB(20)”MET 
A: ” MT 

930 RETURN 

940 1 RIDEFINIZIONE GRAFICA 
950 CLS: PRINT: PRINT: PRINT” 

» » m x » x % 

AB VVW 

r*¥TTT tVW 

» » » » 

» % % m 


960 PRINT:PRINT: PRINT’ 



970 PRINT:PRINT:PRINT" / 

III I II I 
I II 1141 
Il II % I I % I 


■ i i ri 

I V II II 

«■ — i ii 
—■ i i 

i li i 


i i 
% 


i % 


i i 


980 SPRITES <12)=CHR$ <96>+CHR$ <240)+CHRS < 
240)+CHR$(96) 

990 POKE60000! , 0 

1000 RESTORE 1050:FORI = 128*8T0130*8-1: RE 
ADU:VPOKEI,U:NEXT 
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1010 F0RI=136*8T0137*8-1:READU:VPOKEI,U: 
NEXT 

1020 RESTOREI070:F0RE=1T011:F0RI = 1T032:R 
EADU:S$=S$+CHR$<U>:NEXT:SPRITES(E)=SS:S$ 
="":NEXT 

1030 RESTORE 1180: FORI=49152! TO 49717!: 
READU:POKEI,U:NEXT:KA=USR<0>:CLS 
1040 RETURN 

1050 DATA 126,126,126,0,231,231,231,0, 1 

70,85,170,231,231,231,0 

1060 DATAO,102,0,24,0,102,0,24 

1070 DATA 0,0,1,19,9,15,7,3,3,1,2,2,6,4, 

4,12,0,32,144,208,144,240,224,192,192,19 

2,160,32,32,32,48,0 

1080 DATA 0,4,9,11,9,15,7,3,3,3,5,4,4,4, 
12,0,0,0,128,200,144,240,224,192,192,128 
,64,64,96,32,32,48 

1090 DATA 0,0,17,19,9,15,7,3,3,3,5,4,4,8 
,24,0,0,0,136,200,144,240,224,192,192,12 
8,64,64,64,32,48,0 

1100 DATA 0,24,8,4,4,5,3,3,3,7,15,9,19,1 
7,0,0,0,48,32,64,64,64,128,192,192,224,2 
40,144,200,136,0,0 

1110 DATA 1,3,2,3,1,65,126,59,77,7,2,5,0 
,0,0,0, 192,224,160,224,64,193,191,238,89 
,240,160,80,0,0,0,0 

1120 DATA 1,3,2,3,1,1,14,27,29,31,26,21, 
24,14,4,0,192,224,160,224,64,192, 184,236 
,92,252,172,84,12,56,16,0 
1130 DATA 126,255,255,255,255,255,255,25 
5,255,255,255,126, 0,0, 0,0, 0,0, 0,0, 0,0,0, 
0, 0, 0, 0, 0, 0, 0, 0, 0 

1140 DATA 0,0,24,200,82,102,138,80,248,1 
68,112,112,112,0,0,0,0,0,0,0,0,0,0,0,0,0 
, 0 , 0 , 0 , 0 , 0,0 

1150 DATA 24,6,1,255,213,170,213,170,213 
, 170,213,170,213,255,110,25,48,192,0,255 
,87,13,71,141,71,173,71,173,87,251,238,4 
8 

1160 DATA 255,128,223,255,183,171,247,19 
0, 189,252, 189, 190,223,191, 191,127,252,2, 
253,255,255,255,29,175,87,165,87,175,29, 
255,255,255 

1170 DATA 0,0,32,80,32,32,112,248,168,21 
6,248, 112, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0, 0,0,0, 
0, 0, 0, 0, 0 

1180 DATAI,32,0,17,104,191,33,32,24,205, 
89,0,1,32,0,17:* 49168 

1190 DATA32,24,33, 144, 191,205,92, 0, 1,32, 
0,17,184,191,33,64:* 49184 
1200 DATA24,205,89,0,1,32,0,17,64,24,33, 
104,191,205,92,0:* 49200 

1210 DATAI,32,0,17,104,191,33,96,24,205, 
89,0,1,32,0,17:• 49216 

1220 DATA96,24,33,184,191,205,92,0,1,32, 

0, 17, 184,191,33,128: * 49232 

1230 DATA24,205,89,0,1,32,0, 17, 128,24,33 


,104,191,205,92,0:• 49248 

1240 DATAI,32,0,17,104,191,33,160,24,205 

,89,0,1,32,0,17:’ 49264 

1250 DATA160,24,33,184,191,205,92,0,1,32 

,0,17,184,191,33,192:* 49280 

1260 DATA24,205,89,0,1,32,0,17,192,24,33 

,104,191,205,92,0:» 49296 

1270 DATAI,32,0,17,104,191,33,224,24,205 

,89,0,1,32,0,17:* 49312 

1280 DATA224,24,33,184,191,205,92,0,1,32 
,0,17,184,191,33,0:•Z49328 
1290 DATA25,205,89,0,1,32,0,17,0,25,33,1 
04,191,205,92:* 49343 

1300 DATAO,1,32,0,17,104,191,33,32,25,20 
5,89,0,1,32, 0 : » 49359 

1310 DATA17,32,25,33,184,191,205,92,0,1, 

32,0,17,184,191,33:* 49375 

1320 DATA64,25,205,89,0,1,32,0,17,64,25, 

33,104,191,205,92: 1 49391 

1330 DATAO,1,32,0,17,104,191,33,96,25,20 

5,89,0,1,32,0:* 49407 

1340 DATA17,96,25,33,184,191,205,92,0,1, 

32,0,17,184,191,33:* 49423 

1350 DATA128,25,205,89,0,1,32,0,17,128,2 

5,33,104,191,205,92:’ 49439 

1360 DATAO,1,32,0,17,104,191,33,160,25,2 

05,89,0,1,32,0:’ 49455 

1370 DATA17,160,25,33,184,191,205,92,0,1 

,32,0,17,184,191,33:* 49471 

1380 DATA192,25,205,89,0,1,32,0,17,192,2 

5,33,104,191,205,92:* 49487 

1390 DATAO,1,32,0,17,104,191,33,224,25,2 

05,89,0,1,32,0:*Z49503 

1400 DATAO,17,224,25,33,184,191,205,92,0 
,1,32,0,17,184,191: 1 49518 
1410 DATA33,0,26,205,89,0,1,32,0,17,0,26 
,33,104,191,205:• 49534 

1420 DATA92,0,1,32,0,17,104,191,33,32,26 
,205,89,0,1,32:* 49550 

1430 DATAO,17,32,26,33,184,191,205,92,0, 

1,32,0,17,184,191:• 49566 

1440 DATA33,64,26,205,89,0,1,32,0,17,64, 

26,33,104,191,205:» 49582 

1450 DATA92,0,1,32,0,17,104,191,33,96,26 

,205,89,0,1,32:* 49598 

1460 DATAO,17,96,26,33,184,191,205,92,0, 

1,32,0,17,184,191:• 49614 

1470 DATA33,128,26,205,89,0,1,32,0,17,12 

8,26,33,104,191,205:* 49630 

1480 DATA92,0,1,32,0,17,104,191,33,160,2 

6,205,89,0,1,32:» 49646 

1490 DATAO,17,160,26,33,184,191,205,92,0 

,1,32,0,17,184,191:’ 49662 

1500 DATA33,192,26,205,89,0,1,32,0,17,19 

2,26,33,104,191,205: * Z49678 

1510 DATA92,0,1,32,0,17,104,191,33,224,2 

6,205,89,0,1:» 49693 

1520 DATA32,0,17,224,26,33,184,191,205,9 

2,0,175,33,144,191,54:» 49709 

1530 DATA128,35,60,254,32.56,248,201 

_L 
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Sistemi 

MSX 


Per i possessori di MSX2 compreso 

di digitalizzatore , un programma per salvare in diretta immagini 
TV o videoregistrate, attraverso 4 diversi screen e persino in altis- 
di OSVALDO CONTENTI sima risoluzione 512 x 212 



on le inesauribili possibilità che ci offre un MSX2 
provvisto di DIGITALIZZATORE, possiamo gestire le 
immagini provenienti da fonti esterne (TV, VHS, BE¬ 
TA) in modo davvero autonomo, combinando le 
possibilità di visione elettronica degli SCREEN 8, 
7,6 e 5 con la nostra fantasia, regalandoci immagini da salvare su 
dischetto al fine, magari, di rimontarle in seguito seguendo una ve¬ 
ra e propria sceneggiatura. Il programma in questione aiuterà non 
poco gli amatori della immagine codificata, permettendo loro di 
spalancare anche gli altri 3 SCREEN (di solito viene usato solo lo 
screen 8) 7; 6 e 5 al gioco della manipolazione in video. È chiaro 
che per lo standard MSX, quando si parla di digitalizzazione, il pri¬ 
mo elaboratore che viene in mente è l’NMS 8280 della Philips, che 
con i suoi 2 drive ed innumerevoli IN/OUT per la ripresa video ester¬ 
na è il TOP-COMPUTER nel suo genere; e a parte ogni pubblicità è 
senz’altro la macchina che consiglierei a qualsiasi lettore in odore 
di digitalizzazione e vera e propria regia delle immagini. 


Il PROGRAMMA 

Non appena avrete dato il RUN, lo schermo si ricoprirà di nero e la 
cornice sfarfallerà in continuazione di bianco, a questo punto pre¬ 
mete il pulsante del DIGITALIZZATORE che permette l’ingresso in 
video di una fonte esterna; nell’NMS 8280 questo tasto è il SOURCE 
SELECT, se non disponete di un NMS 8280, leggete nel manuale 
d’uso qual’è il tasto adibito a quanto finora descritto. 

Svolta questa primissima agevole operazione non vi resta che sce¬ 
gliere un qualsiasi canale TV o dare il PLAY al vostro videoregistra¬ 
tore (per l’allacciamento di queste fonti esterne consultare preven¬ 
tivamente i relativi manuali d’uso). 

A questo punto, se gli allacciamenti sono stati effettuati corretta- 
mente, dovreste vedere l’immagine proveniente da fonte esterna 
completamente digitalizzata, ovvero vista con gli occhi dell’elabo¬ 
ratore. 

Il primo tipo di digitalizzazione che vedrete sarà effettuato sempre 
attraverso lo SCREEN 8, che con i suoi 256 colori ed un risoluzione 
256 x 192 vi restituirà una visione altamente verista e il più possibile 
aderente ai toni dell’immagine traslata. Ora non vi resta che sfrutta¬ 
re a pieno le capacità di DIGIT 4 che sono davvero molte, poiché ol¬ 
tre alla già citata digitalizzazione mediante 4 schermi diversi, potre¬ 


te, premendo un semplice tasto, ottenere un FERMO IMMAGINE in 
DIRETTA con trasmissione televisiva in corso, assai più perfetta di 
qualsiasi videoregistratore; naturalmente si parla sempre di imma¬ 
gini digitalizzate! Con DIGIT 4, potrete salvare delle immagini su di¬ 
schetto anche senza nessun preavviso alla macchina (cioè anche 
senza fermo immagine), nella sezione FILE potrete addirittura cari¬ 
care immagini codificate (già presenti su disco) trasferendole da 
uno SCREEN all'altro, scoprendo effetti di colorazione dove magari 
questi prima non apparivano, infine potrete SALVARE qualsiasi im¬ 
magine video con titoli auto-discriminanti che in pratica auto- 
dichiarano la loro provenienza di SCREEN; ma questo lo vedremo 
in seguito. Ora seguite l’organizzazione della tastiera nelle diverse 
AREE di lavoro e preparatevi ad un tuffo nelle immagini. 


TASTIERA E AREE DI LAVORO 

- Tastiera Area Digitalizzatrice 
premere il tasto: 

- 8 per digitalizzare con SCREEN 8 /256 colori/r. 256x192 

- 7 per digitalizzare con SCREEN 7/16 colori/r. 512x212 

- 6 per digitalizzare con SCREEN 6 /4 colori/r. 512x212 

- 5 per digitalizzare con SCREEN 5 /16 colori/r. 256x212 

- SELECT per ottenere il FERMO IMMAGINE. 

Se ripremete questo tasto tornate alla normale digitalizzazione in 
diretta. 

Quando il fermo immagine è attivo potete premere il tasto ESC per 
salvare la stessa immagine su dischetto.. 

- ESC per salvare immediatamente l’immagine video su dischetto, 
questo anche senza aver imposto il fermo immagine. 

Alla fine del salvataggio il programma torna invariabilmente alla di¬ 
gitalizzazione con SCREEN 8. 

- F per passare alla visione dei FILE contenuti nel dischetto del dri¬ 
ve A, onde caricarne uno o tornare alla normale digitalizzazione. 

- GRAPH + E per dare l’END al programma 

- Tastiera Area File 

Viene attivata col tasto F nell’area digitalizzatrice. 

In questa area premere il tasto: 

- SELECT per tornare a digitalizzare in diretta 

- INS per CARICARE su video un’immagine già codificata su di¬ 
schetto 
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Non appena premuto INS vi verrà chiesto: 

* di digitare il nome del file da CARICARE compresa l’estensione 
PIC (unico tipo di file accettato), digitato il nome premete RETURN 

* di digitare un numero compreso tra 8 e 5 compresi corrispondente 
al numero di SCREEN su cui deve essere caricata l'immagine codi¬ 
ficata. 

Premuta una delle suddette cifre l’immagine verrà caricata dopo 
qualche secondo di attesa. 

- Tastiera Area Immagine Codificata 
Premete il tasto: 

- SELECT per tornare a digitalizzare 

- INS per la visione dei file inseriti su disco o per caricare un’ulterio¬ 
re immagine 


scambi fra lo screen 8 e 7, nonché fra gli SCREEN 6 e 5; ogni altro 
scambio visualizza o parte deH’immagine ingrandita o immagini 
rimpicciolite, ma totali, ridotte di 4 volte la capacità dello schermo. 
Il programma DIGIT 4 contiene una dovuta ON ERROR GOTO per 
evitare il salto del programma in caso di dischetto non inserito, di fi¬ 
le non trovati (disco vuoto), o di errata digita del nome del file; in 
questo ultimo caso il programma tornerà invariabilmente all'area 
digitalizzatrice senza nessun preavviso, mentre per i primi due casi 
degli appositi messaggi vi delucideranno dell’errore commesso ri¬ 
proponendovi la procedura iniziale. 

Per quanto concerne i nomi dei file di salvataggio immagine auto¬ 
composti dall’elaboratore, essi sono formati nel seguente modo: 

esempio: 8F1.PIC 


PRECISAZIONI 


L’area digitalizzatrice è sempre la prima ad innestarsi dopo il RUN. 
Su normali dischetti da 3.5 doppia faccia e doppia densità, format¬ 
tato, vi è spazio per un massimo di 13 immagini codificate e memo¬ 
ria residua del disco al valore 2. 

Le immagini codificate su dischetto possono essere traslate con 


Il primo carattere del NOME del FILE è sempre una cifra dal 5 all’8 
compresi e rammenta da quale numero di SCREEN è stata tratta 
l’immagine codificata; la lettera F ricorda che è stata ottenuta me¬ 
diante il programma DIGIT 4 e l’ultimo elemento, in questo caso la 
cifra 1.segue in maniera progressiva il numero dei salvataggi effet¬ 
tuati. 

Proprio per seguire questa progressione numerica sarà bene che 
prima di riusare DIGIT 4 modifichiate il numero della variabile N 
(proprio in testa al listato), aumentando la cifra zero sino al numero 
dei salvataggi già effettuati con il presente programma. 


IO REM - 

20 REM ***** DIGIT 4 ***** 

30 REM - 

40 REM Programma per MSX 2 
50 REM provvisto di 
60 REM digitalizzatore. 

70 REM - 

80 REM di Osvaldo Contenti 

©0 REM - 

100 N=0 

110 SCREEN8:QS=”8” 

120 C0L0R15,1,255: TN=1 
130 SETVIDEO 1,0 

140 REM - 

150 REM DIGIT SCREEN 8 

160 REM - 

170 COPYSCREEN 

180 REM - 

190 REM TASTIERA PRINCIPALE 

200 REM - 

210 AS=INKEYS 

220 IF A$="”THENG0T0170 

230 IF ASC ( AS ) =205 THEN 1200 

240 IFAS="F”ORAS=” f " THEN690 

250 IF ASC(AS)=24 THEN 340 

260 IF ASC <AS)=27 THEN 400 

270 IF AS="8" THEN 110 

280 IF AS="7" THEN 510 

290 IF AS=”6” THEN 570 

300 IF AS=”5" THEN 630 ELSE 170 

310 REM - 

320 REM FERMO IMMAGINE 

330 REM - 

340 KS=INKEYS:IFKS="”THEN340 

350 IFASC (KS)=27THEN400 

360 IFASC(KS)=24THEN170BLSE340 

370 REM - 

380 REM SALVA IMMAGINE 

390 REM - 

400 N=N+1:FS="F":BS=STRS(N):ES=” . PIC" 

410 NS=MIDS(BS,2,LEN(BS) > 

420 ON TN GOTO 440,460 

430 REM Salva SCREEN 8 o 7 

440 BSAVE QS+FS+NS+ES,AHO,AHD400,S:G0T04 

70 

450 REM Salva SCREEN 6 o 5 
460 BSAVE QS+FS+NS+ES,&H0,&H6A00,S 
470 ON ASC (QS)-52 GOTO 630,570,510,110 
480 REM - 


490 REM DIGIT SCREEN 7 

500 REM - 

510 SCREEN7 

520 COLOR15,1, 15: TN=1: QS="7" 

530 GOTO 130 

540 REM - 

550 REM DIGIT SCREEN 6 

560 REM - 

570 SCREEN6 

580 C0L0R15, 1, 15: TH=2: QS=”6” 

590 GOTO 130 

600 REM - 

610 RBM DIGIT SCREEN 5 

620 REM - 

630 SCREEN5 

640 COLOR15,1,15:TN=2: QS=”5" 

650 GOTO 130 

660 REM - 

670 REM VISIONE DEI FILES 

680 REM - 

690 SCREENO: VIDTH80 : KBYOFF:COLOR15, 1, 1 : C 
LS 

700 SETVIDEOO, 0 

710 PRINT”- 

— LISTA DEI FILES - 


720 PRINT” 


730 ON ERROR GOTO 860 
740 FILES 

750 PRINT:PRINT”- 


760 MD=DSKF(1):PRINT”MEMORI A DISCO RIMAS 
TA: ";MD 

770 PRINT"* Premi il tasto SELECT per to 
mare a digitalizzare” 

780 PRINT”* Premi il tasto INS per carie 
are un file di immagine” 

790 ZS=INKEYS:IFZS="”THEN790 
800 IF ASC(Zi)=24 THEN 110 
810 IF ASC (ZS) = 18 THEN 990 
820 GOTO 790 

830 REM - 

840 REM MESSAGGI D* ERRORE 

850 REM - 

860 IF ERR=70 THEN 880:REM disk offline 
870 IF ERR=53 THEN 930:REM file not foun 


d 

880 PRINT”Dischetto non inserito ! Immet 
tilo nel drive A e premi RETURN.” 

890 PRINT”Oppure premi SELBCT per tornar 
e a digitalizzare.” 

900 ERS=INKEYS:IF ER$=”" THEN 900 

910 IF ASC(ERS)=13 THEN RÉSUMÉ 

920 IF ASC(ERS>=24 THEN RÉSUMÉ 110 ELSE 

900 

930 PRINT”Il disco non contiene nessun f 
ile. " 

940 PRINT”Fra pochi istanti tornerò a di 
gitalizzare.” 

950 FORT=1T05000:NEXTT: RÉSUMÉ 110 

960 REM - 

970 REM CARICA IMMAGINE CODIFICATA 

980 REM - 

990 PRINT"Digita il nome del file compre 
sa l'estensione PIC (tutto in maiuscolo) 

19 

1000 INPUT TITS 

1010 PRINT”In quale SCREEN vuoi caricare 
l’immagine <8;7;6 o 5) ? 

1020 PS=INKEYS:IFPS=””THEN1020 

1030 IF ASC <P$)<53 OR ASC(PS>>56 THEN 10 

20 

1040 PLAY”L64ABC”:PRINT"SCREEN "; PS 
1050 PRINT”OK ! Eseguo. 

1060 PRINT”* Ad immagine caricata premi: 

1070 PRINT”- SELECT per tornare a DIGITA 
LIZZARE” 

1080 PRINT"— INS per CARICARE una nuova 
immagine” 

1090 FORT=1T05000:NEXTT 

1100 ON ASC(PS>-52 GOTO 1110,1120,1130,1 
140 

1110 SCREEN5:COLOR15,1,15:GOTO1150 

1120 SCREEN6:COLOR15,1,15:GOT01150 

1130 SCREEN7:COLOR15,1.15:GOT01150 

1140 SCREEN8:COLOR15,1,255 

1150 SETVIDEOO,0 

1160 BLOAD TITS,S 

1170 YS=INKEYS:IFYS="”THEN1170 

1180 IFASC(YS>=24 THEN 110 

1190 IFASC(YS> =18 THEN 690 ELSE 1170 

1200 SETVIDEO 0,0 

1210 END 
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MS-DOS 


In genere l'efficienza di una prò ce- ^IK§?UK8iÌ 
dura di sort dipende solo dall'ordinamento iniziale dei dati e non 
di GIANCARLO TARONI dalla natura statistica degli stessi 

Procedura Sort 

ORDINAMENTI E NATURA STATISTICA DEI DATI 


el numero 17, (anno 3, 1984), della rivista Personal 
Software è stato presentato un algoritmo di sort nu¬ 
merico a calcolo di indirizzo che, pur occupando 
memoria aggiuntiva, risulta sicuramente veloce. 
Non è così però per le subroutine del listato di nome 
“indirizzol ” e "ripartizionel " che risultano sicuramente efficaci su 
campioni (dati) che presentano un istogramma generalmente piat¬ 
to. 

In questo caso i sort in esame sono più veloci, e non di poco, dello 
stesso quick-sort. 

Nel listato si modificano i programmi originali (“indirizzol e riparti¬ 
zionel rispettivamente in indirizzo2 e ripartizione2”) in modo da 
renderli praticamente a efficienza costante, indipendenti cioè dal- 
Tistogramma, piatto o no, dei dati da ordinare. 

Così facendo si ottengono due metodi un po’ più lenti di quelli ori¬ 
ginali se applicati nelle condizioni di ottimalità di questi ultimi ma 
estremamente più efficienti nelle rimanenti situazioni, su dati carat¬ 
terizzati da qualsiasi tipo di istogramma. 

Il trucco consiste nel ricondurre i dati ad assumere una forma stati¬ 
stica prestabilita, quella appunto di ottimalità degli algoritmi origi¬ 
nali. 

/ PROGRAMMI 

Il programma indirizzol , come descrive Angelo De Santis, si chiama 
“a calcolo di indirizzo” e il nome deriva dal fatto che pone in un ar- 
ray supplementare (L()) l'indirizzo degli elementi da ordinare. 

Ad esempio se la successione x() da ordinare è la seguente: 

6 0 11 12 4 3 

il vettore L() è composto dagli elementi: 

265134 

Il metodo consiste nel costruire una funzione capace di porre gli in¬ 
dici degli elementi da ordinare in prossimità del loro posto definiti¬ 
vo. 

Nel programma si indica con n la lunghezza deH'array x(), con xl il 
minimo e con x2 il massimo. La funzione che ripartisce i dati, utiliz¬ 
zata dal programma originale è: 

F(x,n) = min((int((x-x1 )*n/(x2-x1 )) +1 ,n) 


Detta funzione in corrispondenza ai sei dati in esame assume i va¬ 
lori: 


X () 

F ( x , n ) 

POSTO 

DEFINITIVO 

VETTORE 

LO 

6 

4 

4 

L(4)=1 

O 

1 

1 

L(1)=2 

11 

6 

5 

L(5)=3 

12 

6 

6 

L(6)=4 

4 

3 

3 

L(3)=5 

3 

2 

2 

L(2)=6 


Se ai sei dati x() si aggiunge una costante, o li si moltiplica per un 
fattore k, la funzione F ripartisce gli elementi allo stesso modo. 
Se invece si calcola la radice quadrata degli x() la ripartizione cam¬ 
bia, pur rimanendo l’ordinamento iniziale inalterato: sqr(x()) = (2.4 
0 3.3 3.4 21.7), posto provvisorio: F(x(),n) = (5 1 6644) mentre il po¬ 
sto definitivo rimane inalterato. 

Il numero delle collisioni (terzo e quarto elemento, quinto e sesto) in 
questo caso aumenta e, di conseguenza, diminuisce l’efficienza 
dell'algoritmo. 

Il compito della funzione di ripartizione è quello di evitare per quan¬ 
to possibile le collisioni. 

Problemi analoghi sorgono nelle procedure di inserimento di tipo 
Hash. Il metodo infatti presenta analogie con l’inserimento Flash: 

- si azzera il vettore di interi L() di dim 3n e si determina, con un uni¬ 
co ciclo il minimo e il massimo valore dell’array x(): xmin, xmax; 

- per i = 1.n si pone ip = i, se il posto iv associato a x(i) tramite la 

F(x(i),n), nel vettore L() è nullo si pone L(iv) = i e si continua il ciclo. 

- Se x(L(iv))< = x(ip) si cerca una posizione nulla in L() incrementan¬ 
do di 1 iv. 

- Se x(L(iv))>x(ip) si pone j = ip, ip = l(iv),L(iv) = j, si incrementa iv e si 
ricerca una posizione libera. 

IE MODIFICHE 

L’istogramma equispaziato dei dati si ottiene suddividendo l’inter¬ 
vallo xmax-xmin in m parti uguali: ISTOG(i) = xmin + (xmax- 
xmin)*i/m e contando il numero degli x() (frequenze FREQQ) com¬ 
presi nell’intervallo i. 
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Il calcolo del numero degli x() compresi tra ISTOG(i-l) e ISTOG(i) è 
particolarmente semplice e veloce: si azzera il vettore FREQQ di di¬ 
mensione m (m = numero delle celle) e per ogni x() si calcola la 
quantità j = F(x,m), con m al posto di n. 

Si pone quindi FREQ(j) = FREQ(j) 1. All’elemento ISTOG(i) resta 
cosi associata il valore di frequenza FREQ(i). 

La somma complessiva dei valori FREQQ è pari a n. Quindi, divi¬ 
dendo le componenti per n si ottiene la quota P() (parte %) degli x() 
che insiste sull’intervallo ISTO(i-1),ISTO(i): 

P(i) = FREQ(i)/n 1 i = 1.m. 

Le somme successive: 

FREQ(i) = FREQ(i) + FREQ(i-1 ), P(i) = P(i) +P(i-1). i=2.m indica¬ 

no rispettivamente la quota assoluta e relativa degli x() minori o 
uguali al valore ISTOG(i). Utilizzando i valori (j = F(x(i),.),ISTOG(j- 
),P(j)) si ricava per interpolazione, una funzione dei dati tanto più 
precisa quanto più grande è m, ossia quanto più piccole sono le 
basi deH’istogramma. Il valore di j indica l’intervallo di appartenen¬ 
za del particolare valore x = x(i) nell’istogramma così costruito. 


La quota relativa di elementi x() minori o uguali a x è valutata da in¬ 
terpolazione: 

G = (x-ISTOG(j-1))*(P(j)-P(j-1))/(xmax-xmin)/m +P(j-1) . con 

P(0) = 0 

La quantità min(n*g + 1,n) è più adatta della precedente (F) per ri¬ 
partire gli elementi in esame. 

L’altro metodo di ordinamento: RIPARTIZIONE1, ripartisce i dati in 
m classi di frequenze equispaziate, associando ad ogni punto di 
una stessa base deH’istogramma la somma cumulata delle fre¬ 
quenze. 

Per individuare la cella di appartenenza del valore x = x(i) si pone 
j = F(x,m). Al valore di x compreso tra ISTOG(j-1),ISTOG(j) si asso¬ 
cia la frequenza cumulata FREQ(j) che rappresenta il numero degli 
x() minori o uguali a ISTOG(j). 

Quindi, l’indirizzo di x = x(i), nella successione ordinata degli x() sa¬ 
rà posto nelle vicinanze di FREQ(j) e basterà porre L(FREQ(j)) = i. 
Si decrementa poi di 1 il valore FREQ(j) evitando collisioni e sovra- 
scritture di dati. Dopo aver collocato ogni indice dell’array x() nelle 
presumibili vicinanze del posto occupato nell’ordinamento definiti¬ 
vo, si applica all’intero array L() un sort per inserimento lineare, no¬ 
toriamente veloce per tabelle quasi ordinate. 


Tabella dei risultati 

: tempi, confronti e scambi 




rettangolare 

esponenz 

i al e 


normale 



X 

o 

o 

H 

li 

c 

=2 

X () 

=-log(1-z) 

x () = 

1 1 1 

cn 

0 

rH 

1 

~2z))*COS(2PIy) 


c 

S 

T 

C 

S 

T 

C 

S 

T 

indirizzol 

198 

29 

12 

2428 

953 

48 

634 

218 

19 

indirizzo2 

208 

33 

20 

190 

26 

20 

178 

17 

20 

ripartizionel 

206 

307 

16 

354 

457 

19 

282 

383 

18 

ripartizione2 

215 

317 

30 

197 

299 

29 

207 

308 

30 

n=500 

indi rizzol 

1134 

158 

61 

82274 

31967 

1351 

3794 

1280 

104 

indirizzo2 

1178 

182 

101 

1216 

205 

101 

1078 

163 

100 

ripartizionel 

1070 

1570 

81 

2127 

2629 

103 

1499 

1999 

90 

ri partizione2 

C=confronti S 

1094 

=scambi 

1599 149 

T=tempo 

1135 

1635 

148 

1112 

1613 

149 
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L'efficienza di questo metodo, come di quello precedentemente de¬ 
scritto, dipende dal tipo di dati. 

Le stesse modifiche introdotte per il primo programma, lo rendono 
a prestazioni indipendenti dalla natura statistica delle osservazio¬ 
ni. 

Le routine “ripartizionel-2” necessitano di un vettore delle fre¬ 
quenze FREQ di dimensione m, oltre che del vettore L() di dim n, 
dove si collocano gli indirizzi dei valori ordinati. 

Il programma u ripartizione2” tratto dal precedente, necessita an¬ 
che di un vettore aggiuntivo P() di dimensione k (m nel caso prece¬ 
dente). 

Da prove effettuate il vettore P() in entrambi i programmi (indirizzo2 
e ripartizione2) può essere di dimensioni del tutto trascurabili, con 
k (o m) pari a 10, si ottengono i risultati della tabella riportata. 
La scelta del parametro m, per gli ultimi due sort del listato, dimen¬ 
sione del vettore FREQ() può essere tra il 10% e il 100% della di¬ 
mensione campionaria n. 

In ipotesi di ottimalità se cioè l’istogramma dei dati è piatto, la com¬ 
plessità dei metodi è dell'ordine di n*n/(4m). 

Infatti, restano da ordinare gli m blocchi di dati con il metodo di in¬ 
serimento o con il metodo del doppio scorrimento. 
Nell’applicazione presentata si è posto m = n/5, pari cioè al 20% di 
n. 

CONCLUSIONI 

Le procedure analizzate, pur richiedendo memoria aggiuntiva, ri¬ 
sultano sicuramente utili quando non si vogliono spostare fisica- 
mente gli elementi del vettore originale. 

Si pensi ad esempio di volere ordinare a turno i vettori colonna di 
una matrice di una certa dimensione. 

Un’altra notevole applicazione consiste nell’assegnare i ranghi ai 


1.0 DEFINT I - N 

20 DEF FNAMAX(X,Y)=-(X*(X>=Y)+Y*(Y>X)) 

30 DEF FNAMIN(X,Y)=-(X*(X<Y)+Y*<Y<=X)) 

40 DEF FNF(X,N)- INT(FNÀMIN((X~X1)*N/(X2 
-XI)+1,N)) 

50 DEF FNR(X)=X 

60 X1=X2=N=M=I=J=IP=Y=IV=N1=M1=K=L0=0: PI 
G=3.14159265# :XX=XX1=XX2=H=0 
70 INPUT-N M K N,M,K:N1=3*N 
80 REM 

90 DIM X(N+2),IFREQ(M),L(N1),P(M),H$(5) 
100 H$ ( 1) =”INDIRIZZ01”2 H$ (2) =”INDIRIZZ02 
-2H$(3)=”RIPARTIZI0NE1”2H$(4)=”RIPARTIZI 
ONE 2” 

110 REM PROGRAMMA NATORD. 

BAS 

120 Zl$=””2Z2$=Z1$ 

130 FOR 1=1 TO N:X(I)=FNR<RND)2NEXT 

140 FOR 1=1 TO 4 2PRINT I;H$(I); 2NEXT :P 

RINT 2 INPUT**QUALE” ; LO 

150 REM 

160 REM 

170 REM 


dati: a ciascun elemento x() viene associato il numero d’ordine che 
gli compete nella successione crescente dei valori ordinati. 

In questo caso basta porre: Rango(L(i)) = i, i = 1.n. 

(Vedi tabella nella pagina a fianco). 

Si sono tratti i dati da ordinare (x()) da alcune variabili statistiche di 
uso frequente: rettangolare, esponenziale e normale. 

A tale scopo si è utilizzata la funzione di sistema RND. 

Risultati ancora più favorevoli alle modifiche proposte si ottengono 
analizzando le stesse quantità su campioni caratterizzati da una 
forte variabilità. A sostegno di questa affermazione si è posto x(- 
) = 1/(1-rnd), m = k = n/5, n = 100 e si sono ordinati poi i dati con il 
metodo di scorrimento ottenendo la tabella che segue: 



C 

S 

T 

indirizzol 

8602 

2432 

135 

i ndirizzo2 

1272 

476 

38 

ri partizionel 

2015 

1920 

55 

ri partizione2 

303 

208 

30 
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180 REM 

190 TIME$ = "002 002 00” 

200 Z1$=TIME$ 

210 ON LO GOSUB 420,620,850,960 
220 Z2$=TIME$ 

230 PRINT”SUBROUTINE”;LO;H$(LO) 

240 XX1=VAL(MID$(Zl$,7,2))+VAL(MID$(Zl$, 
4,2))*60 

250 XX2=VAL(MID$(Z2$,7,2))+VAL (MID$ (Z2$, 
4,2))*60 

260 PRINT”TEMPO”;XX2-XXI 
270 PRINT”N”;N; ”M”;M;”K”;K 
280 PRINT”CONFRONTI”;X(N+1) ; ”SCAMBI”;X(N 
+ 2 ) 

290 LIST 50 

300 PRINT”==========”:PRINT 

310 END 

320 REM FUNZIONE G 
330 H=X2-XI2 J=FNF(XX,M) 

340 G=(XX-(Xl+<J-l)*H/M))*(P(J)-P(J-l))/ 
(H/M)+P(J-1) 

350 RETURN 
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351 REM INIZIALIZZAZIONE NUOVO METODO 
360 FOR 1=1 TO M: P(I)=0:NEXT 
370 FOR 1=1 TO N:J=FNF(X(I),M) 

380 P(J)=P(J)+1 :NEXT 

390 FOR 1=1 TO M:P(I)=P(I)+P(I-1): NEXT: 
FOR 1=1 TO M:P(I)=P(I)/N:NEXT :P(0)=0 
400 RETURN 
410 REM =========== 

420 REM INDIRIZZOl 
430 X1=X(1) :X2=X1 

440 FOR 1=1 TO N:L(I)=0:L(I+N)=0:L(I+N+N 
)=0:X1=FNAMIN(XI, X ( I )) : X2=FNAMAX(X2,X(I) 

):NEXT 

450 X(N+1)=0: X(N+2)=0: FOR 1 = 1 TO N 
460 IP=I 

470 IV=FNF(X(I),N> : IV=INT<IV+IV) 

480 X(N+1)=X(N+1)+1:IF L(IV)=0 THEN 530 
490 X(N+1)=X(N+1)+1: IF X(L(IV))<=X(IP) T 
HEN 510 

500 X(N+2)=X(N+2)+1:J=IP:IP=L(IV):L(IV) = 
J 

510 IV=IV+1 
520 GOTO 480 
530 L(IV)=IP 
540 NEXT 

550 J=0:FOR 1=1 TO N: IF J<I THEN J=I 

560 IF L(I)>0 THEN 590 

570 J=J+1:IF L(J)=0 THEN 570 

580 L ( I) =L ( J) : L ( J) =0 

590 NEXT 

600 RETURN 

610 REM ========== 

620 REM INDIRIZZ02 
630 REM 

640 X1=X(1) :X2=X1 

650 FOR 1=1 TO N:X1=FNAMIN(XI,X(I)):X2=F 
NAMAX(X2,X(I ) ) 

660 L(I)=0:L(I+N)=0:L<I+N+N)=0:NEXT:X(N+ 

1)=0:X(N+2)=0 

670 GOSUB 360 

680 FOR 1=1 TO N : IP=I 

690 XX=X(I) : GOSUB 330 

700 IV=INT(N*G)+1: IV=FNAMIN(IV,N) 

710 IV=INT(IV+IV) 

720 X(N+1)=X(N+1)+1:IF L(IV)=0 THEN 760 
730 X(N+1)=X(N+1)+1: IF X(L(IV))<=X(IP) T 
HEN 750 

740 X(N+2)=X(N+2)+1: J=IP:IP=L(IV):L(IV) 
=J 

750 IV=IV+1: GOTO 720 
760 L(IV)=IP 
770 NEXT I 

780 J=0:FOR 1=1 TO N:IF J<I THEN J=I 

790 IF L(I)>0 THEN 820 

800 J=J+1:IF L(J)=0 THEN 800 

810 L ( I) =L ( J) s L ( J) =0 

820 NEXT 


830 RETURN 

840 REM ============= 

850 REM RIPARTIZIONE1 
860 REM 

870 X1=X(1) : X2=X1: FOR 1=1 TO N: X1=FNAMIN 
(X1,X(I)) :X2=FNAMAX(X2 f X(I)) : NEXT:X(N+1) 
=0:X(N+2)=0 

880 FOR 1=1 TO M: IFREQ(I)=0:NEXT 

890 FOR 1=1 TO N: J=FNF(X(I),M)2IFREQ(J) = 

IFREQ(J)+1:NEXT 

900 FOR 1= 2 TO M: IFREQ(I)=IFREQ(I)+IFRE 
Q(I-l)2NEXT 

910 FOR 1= N TO 1 STEP -1 

920 J= FNF(X(I),M)2IP=IFREQ(J) :L(IP) =1: 

IFREQ(J)=IFREQ(J)-1: NEXT 

930 GOSUB 1140 

940 RETURN 

950 REM ============== 

960 REM RIPARTIZIONE2 
970 REM 

980 Xl= X(l)2X2=X1:F0R 1=1 TO N: X1=FNAMI 
N(XI,X(I))2 X2=FNAMAX(X2,X(I))2NEXT :X(N+ 

1) =0:X(N+2)=0 

990 MI=M: M=K:GOSUB 360: M=M1 
1000 FOR 1 = 1 TO M:IFREQ(I)=02 NEXT 
1010 FOR 1=1 TO N 

1020 Ml= M: M=K:XX=X(I)2 GOSUB 330:M=M1 
1030 J=INT(M*G)+1:J=FNAMIN(J,M) 

1040 IFREQ(J)=IFREQ(J)+1:NEXT 

1050 FOR 1=2 TO M :IFREQ(I)=IFREQ(I)+IFR 

EQ(1-1):NEXT 

1060 FOR I=N TO 1 STEP -1 

1070 M1=M: M=K:XX=X(I)2 GOSUB 330:M=M1 

1080 J=INT(M*G)+12J=FNAMIN(J,M) 

1090 IP=IFREQ(J)2 L(IP)=12IFREQ(J)=IFREQ( 

J)-12NEXT 

1100 REM 

1110 GOSUB 1140 

1120 RETURN 

1130 REM ====INSERIMENTO 

1140 FOR 1= 2 TO N: IP=L(I) :X(N+2)=X(N+ 

2 ) +1 

1150 FOR J= 1-1 TO 1 STEP -1 2X(N+1)=X(N 
+1) +1 

1160 IF X(IP)>=X(L(J))THEN 1180 
1170 L(J+l)=L(J)2 X(N+2)=X(N+2)+1:NEXT J 
1180 L(J+l)=IP:X(N+2)=X(N+2)+1:NEXT I 
1190 RETURN 

1200 REM ===SCORRIMENTO 
1210 FOR 1= 1 TO N-l2X(N+l)=X(N+l)+l 
1220 IF X(L(I)) <= X(L(1+1)) THEN 1270 
1230 SWAP L(I) ,L(1+1)2 X(N+2)=X(N+2)+1 
1240 FOR J=I TO 2 STEP -1 2X(N+1)=X(N+1) 
+1 

1250 IF X(L(J)) >= X(L ( J-l)) THEN 1270 
1260 SWAP L(J),L(J-l)2 X(N+2)=X(N+2)+1:NE 
XT J 

1270 NEXT I 
1280 RETURN 
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Fin dairantichità, la rappresenta - 

MS-DOS 


zio ne grafica di funzioni matematiche ha affascinato I ’uomo 
Inizialmente essa veniva fatta su superfici quali sabbia, cera, ar¬ 
gilla . Col trascorrere dei secoli, gradualmente si arrivò alla carta 

di FELICE RUSSO & ANNA MARIA RINALDI e alla lavagna, poi ... 



RAPPRESENTAZIONI GRAFICHE 
DI FUNZIONI MATEMATICHE 

ggi con l’avvento dei Personal Computer ognuno 
può ammirare la rappresentazione grafica di una 
qualsiasi funzione matematica in pochi secondi co¬ 
modamente seduti, senza fare alcun calcolo. 

La vecchia lavagna è stata sostituita dallo schermo 
del computer e il gesso dai pixel che si accendono. 


UN PO’ DI TEORIA 

Fissato in un piano un sistema cartesiano e stabilita una corrispon¬ 
denza biunivoca fra i punti del piano e le coppie dei numeri reali, la 
rappresentazione grafica di una funzione generica f(x), altro non è 
che l'insieme di tutti i punti le cui coordinate soddisfano l’equazio¬ 
ne cartesiana esplicita: y = f(x). 

In altre parole, per ogni valore di x, si trova il corrispondente valore 
y = f(x), e si disegna tale punto di coordinate (x, y) sul piano, dopo 
di che ripetendo la cosa per un certo numero di volte al variare di x, 
si ottiene un luogo geometrico (ordinariamente trattasi di una certa 
curva) che si considera come rappresentazione geometrica della 
funzione f(x). 

Un altro possibile modo per rappresentare una funzione, oltre a 
quello cartesiano, è di ricorrere alle sue equazioni parametriche, 
che sono l’ideale per molti programmi per il disegno di curve. 

In questo caso le coordinate di ogni punto (x, y) sono date in fun¬ 
zione di un parametro t che varia da 0 a 360, cioè 
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X = f1(t) 
y=f2(t) 

e i valori di x e y vengono tracciati, per esempio, a ogni grado. 


PROGRAMMA 

Dopo aver dato il run, il programma presenta sullo schermo il menu 
con 10 opzioni diverse. 

Scegliendo l’opzione 1, il programma grafica 9 versioni della curva 
di PASCAL, le cui equazioni parametriche sono date in 1070-1080. 
Una volta che il programma ha effettuato il grafico, basta premere 
il tasto “”c" per ritornare al menu. 

Questa operazione è la stessa per ogni opzione, per cui in appres¬ 
so la ometteremo. 

Notare che il grafico viene eseguito sfruttando la simmetria della 
curva rispetto ad una retta immaginaria passante per il centro dello 
schermo. 

Tale proprietà è presente in quasi tutte le altre curve analizzate in 
seguito. 

Se si sceglie l’opzione 2, il programma grafica 7 versioni di una cur¬ 
va tutta particolare chiamata IPPOPEDE, che fu studiata per la pri¬ 
ma volta dal filosofo greco Proclo intorno al 475 d.C. 

L’insieme di queste curve assume la forma della saggia civetta Ate¬ 
niese. 

Le equazioni parametriche sono date nelle righe 2020-2030 del li- 
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stato. 

L’opzione 3, permette al programma di graficare sullo schermo le 
curve di BOWDITCH, o figure di LISSAJOUS, generate dalle equa¬ 
zioni parametriche date in 3070-3080 del listato. 

Queste curve sono familiari a chi lavora su oscilloscopi. Infatti se¬ 
gnali elettrici che presentino variazioni sinusoidali, producono sul¬ 
lo schermo deH’oscilloscopio, curve di questo genere. 

Le costanti a e b chieste in input, definiscono un rettangolo di a 
unità di lunghezza e b unità di altezza. 

AlPinterno dei questo rettangolo viene disegnata una curva di 
BOWDITCH. 

I parametri c e d, invece, determinano la forma delle curve. 

A secondo dei loro valori, è possibile avere curve chiuse o aperte. 
Scegliendo l’opzione 4, il programma grafica un certo numero di 
versioni della cubica di TSCHIRNHAUSEN, le cui equazioni para¬ 
metriche sono date nelle righe 4030-4040 del programma. 
L'opzione 5 permette al programma di disegnare 14 versioni di una 
curva bellissima, detta ASTEROIDE, le cui equazioni parametriche 
sono date in 5030-5040. 


Sullo schermo comparirà una famiglia di curve che complessiva¬ 
mente danno l’idea di una “"ragnatela digitale”. 

Con l'opzione 6, sullo schermo appaiono le spirali. 

Tali forme, tra le più belle che si trovino in natura, sono presenti nel¬ 
le conchiglie e nei fiori di girasole. 

Le loro equazioni parametriche sono date in 6040-6050. 

Il parametro a, chiesto in input determina la distanza tra le spire. 
L’opzioni 7 e 8 fanno comparire sullo schermo due curve chiamate: 
TRIFOLIO e QUADRIFOLIO, rispettivamente. 

Come dicono gli stessi nomi, esse non sono altro che le rappresen¬ 
tazioni grafiche del trifoglio e quadrifoglio presenti in natura. 

Le loro equazioni parametriche sono date nelle righe 7050-7060 e 
8060-8070 rispettivamente. 

Scegliendo l’opzione 9 si dà la possibilità al programma di grafica¬ 
re sullo schermo una famiglia di curve molto belle a cui è stato dato 
il nome di INTRECCIO. Le equazioni parametriche sono date in 
9030-9040 del listato. Infine l’opzione 0 permette al programma di 
disegnare un certo numero di versioni di una curva, le cui equazio¬ 
ni parametriche sono date nelle righe 10060-10070 del programma, 
a cui abbiamo dato il nome BEEHIGH; ciò è dovuto al fatto che sul¬ 
lo schermo appare una forma molto simile ad un ape vista dall’alto 
(bee = ape high = alto). 


1 SCREEN 2 !CLS 

2 LOCATE 9,17 :PRINT”CURVES” 

3 LOCATE 13,19 :PRINT"BY" 

4 LOCATE 15, 14 :PRINT"FELICE RUSSO” 

5 LOCATE 17,18 :PRINT”1988” 

IO FOR T-1 TO 12000 :NEXT:SCREEN 2 

15 REM- menu ' - 

20 CLS: LOCATE 2,40 : PRINT”MENU” 

30 LOCATE 4,2:PRINT”1)PASCAL” 

40 LOCATE 6,2:PRINT”2)IPPOPEDE” 

50 LOCATE 8,2:PRINT”3)BOWDITCH” 

60 LOCATE 10,2:PRINT”4)T6CHIRNHAUBEN” 
70 LOCATE 12,2:PRINT”5)ASTEROIDE” 

80 LOCATE 14,2:PRINT”6)SPIRALE” 

90 LOCATE 16,2:PRINT”7)TRIFOLIO” 

100 LOCATE 18,2:PRINT”8)QUADRIFOLIO” 
110 LOCATE 20,2:PRINT”9)INTRECCIO” 

120 LOCATE 22,2:PRINT”0)BEEHIGH” 

125 LOCATE 24,2 :PRINT”F)FINE” 

130 A$-INKEY$ 


140 

IF 

A $ - ” 1 ” 

THEN 

GOSUB 

1000 : GOTO 

20 

150 

IF 

A $ - ” 2 ” 

THEN 

GOSUB 

2000 .-GOTO 

20 

160 

IF 

A $ - ” 3 ” 

THEN 

GOSUB 

3000:GOTO 

20 

170 

IF 

A $ - ” 4 ” 

THEN 

GOSUB 

4000 : GOTO 

20 

180 

IF 

A $ - ” 5 ” 

THEN 

GOSUB 

5000 : GOTO 

20 

190 

IF 

A$-”6” 

THEN 

GOSUB 

6000:GOTO 

20 

200 

IF 

A $ - ” 7 ” 

THEN 

GOSUB 

7000:GOTO 

20 

210 

IF 

A$*”8" 

THEN 

GOSUB 

8000 : GOTO 

20 

220 

IF 

A $ - ” 9 ” 

THEN 

GOSUB 

9000 : GOTO 

20 

230 

IF 

A $ - ” 0 ” 

THEN 

GOSUB 

10000 : GOTO 20 

240 

IF 

A$-”f ” 

THEN 

GOTO : 

260 



250 GOTO 130 
260 CLS 


270 END 

900 REM-pascal- 

1000 CLS 
1010 A-50 

1020 FOR B-20 TO 100 STEP IO 
1060 FOR T-0 TO 3.14 6TEP .01 
1065 K-2*A*C06(T)+ B 
1070 X-K*COS( T) ■♦■320 
1080 Y-K*SIN(T) 

1090 PSET(X,Y+100) 

1092 PSET(X,100-Y) 

1095 NEXT 

1100 NEXT 

1101 LOCATE 22,1:PRINT”ok” 

1110 B$-INKEY$:IF B$<>”c” THEN GOTO 1110 
1120 RETURN 

1900 REM-ippopede- 

2000 CLS 
2002 B-20 

2010 FOR A-20 TO 50 STEP 5 
2015 FOR T—1.57 TO 1.57 STEP .01 
2020 X-4*C0S(T)*(SQR( A*B-B*2*( SIN( T) "2) ) 
) 

2030 Y-4*SIN(T)*(SQR(A*B-B*2*( SIN( T) "2) ) 
) +100 

2040 P6ET(X+320,Y) 

2045 PSET(320-X,Y) 

2050 NEXT 

2055 NEXT 

2056 LOCATE 22, 1 :PRINT”ok" 

2060 B$-INKEY$:IF B$<>”c” THEN GOTO 2060 
2070 RETURN 

2900 REM-bowditch- 
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PROGRAMMI 


3000 

CLS 





3010 

INPUT 

"a 

: valore 

ot tima 1 e 

200 M ; A 

3020 

INPUT 

"b 

: valore 

o11ima 1e 

10Q”;B 

3030 

INPUT 

"c 

: valore 

ot tima1e 

0.25”;C 

3040 

INPUT 

”d 

: valore 

ot tima 1 e 

0” ;D 


3045 INPUT"t valore max in rad (12.6 per 
i valori ottimali precedenti)”; MAX 
3050 CLG 

3060 FOR T-0 T0 MAX STEP .01 
3070 X-A*SIN(C*T+D) 

3080 Y-B*SIN(T)+100 
3090 PSET(X + 320,Y) 

3092 PSET(320-X,Y) 

3100 NEXT 

3101 LOCATE 22,1:PRINT”ok” 

3110 B$-INKEY$ : IF B$o”c” THEN GOTO 3110 
3120 RETURN 

3900 REM - tschirnhausen - 

4000 CLS 

4010 FOR A-2 TO 5 STEP .5 
4020 FOR T-0 TO 4.7 STEP .01 
4030 X-10*A*(T~2-3)+320 
4040 Y-A*T*(T~2-3) 

4050 PSET(X,Y+100) 

4055 PSET(X,100-Y) 

4060 NEXT 

4070 NEXT 

4071 LOCATE 22,1 :PRINT"ok" 

4080 B$-INKEY$:IF B$<>"c" THEN GOTO 4080 
4090 RETURN 

4900 REM-asteroide- 

5000 CLS 

5010 FOR A-10 TO 150 STEP 10 
5020 FOR T-1.75 TO 4.71 STEP .01 
5030 X-A*COS(T)"3 
5040 Y-A*SIN(T)*3+100 
5050 PSET(X+320,Y) 

5052 PSET(320-X,Y) 

5060 NEXT 

5070 NEXT 

5071 LOCATE 22,1 :PRINT”ok" 

5080 B$-INKEY$ : IF B$o M c M THEN GOTO 5080 
5090 RETURN 

5900 REM-spirale- 

6000 CLS 

6010 INPUT”a .-valori bassi spire strette 
"5 A 

6020 CLS 

6030 FOR T-0 TO 80 STEP .05 
6040 X-A*T*COS(T)+320 
6050 Y-A*T*SIN(T)+100 
6060 PSET(X,Y) 

6070 NEXT 

6071 LOCATE 22,1 :PRINT"ok" 

6080 B$-INKEY$ : IF B$o"c" THEN GOTO 6080 
6090 RETURN 

6900 REM -- trifolio - 


7000 CLS 

7010 INPUT”a .-valore ottimale 20Q”;A 
7020 CLS 

7030 FOR T-0 TO 1.58 STEP 5.000001E-03 
7040 K-A*COS(T)-2*A*SIN( T) ~2*C0S(T) 

7050 X-K*COS(T)+200 
7060 Y-K*6IN(T) 

7070 PSET(X,Y+100) 

7075 PSETC X, 100-Y) 

7080 NEXT 

7081 LOCATE 22, 1 :PRINT”ok” 

7090 B$-INKEY$:IF B$<>”c" THEN GOTO 7090 
7100 RETURN 

7900 REM-quadri-folio- 

8000 CLS 

8010 INPUT "a:valore ottimale 200”;A 
8020 CLS 

8030 FOR T-0 TO 3.14 6TEP .01 
8040 K-A*SIN(T)*COS(T) 

8050 X-K*COS(T) 

8060 Y-K*SIN(T)+100 
8070 PSET(X+320,Y) 

8072 PSET(320-X,Y) 

8080 NEXT 

8081 LOCATE 22, 1 :PRINT”ok” 

8090 B$-INKEY$ : IF B$o M c H THEN GOTO 8090 
8100 RETURN 

8900 REM-intreccio- 

9000 CLS 

9010 INPUT"a:valore ottimale 5 ”; A 

9011 CLS 

9020 FOR T-0 TO 3.14 STEP .003 

9030 X-90*SIN(A*T) 

9040. Y-50*EXP( T*SIN( T) ) +10 
9050 PSET(X+320,Y) 

9052 PSET(320-X,Y) 

9060 NEXT 

9061 LOCATE 22,1 :PRINT"ok" 

9070 B$-INKEY$ :IF B$o”c” THEN GOTO 9070 
9080 RETURN 

9900 REM-beehigh- 

10000 CLS 

10001 B-5 

10010 FOR A-1 TO 9 

10020 FOR T-0 TO 3.14 STEP .01 

10030 X=A*COS(T)*(SQR(A*B)-B~2*(SIN(T)"2 

))+320 

10040 Y-A*SIN(T)*(SQR(A*B)-B"2*(SIN(T) A 2 

)) 

10050 PSET(X,Y+100) 

10052 PSET(X,100-Y) 

10060 NEXT 

10070 NEXT 

10071 LOCATE 22, 1 :PRINT M ok" 

10080 B$ = INKEY$ : IF B$o”c M THEN GOTO 100 
80 

10090 RETURN 
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di ANDREA PETRICONI 


Commodore 
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PROGRAMMI 


IPERGRA PHIC 3D 


uesto programma vi permette di visualizzare con il 
vostro 128, in assonometria, una funzione a tre di¬ 
mensioni. 

Pur essendo molto semplice, permette di ottenere ot¬ 
timi risultati. 

Il tracciamento della funzione richiede circa 8 minuti. 

Il monitor incorporato permette di salvare su nastro o disco l’imma¬ 
gine creata con il programma. 

COMMENTO Al II STATO 

0-200: presentazione 

230-280: input funzione da elaborare 

290: limitazione della memoria, azzeramento delle variabili 

300: azzera i puntatori che serviranno ad indicare se un punto è 

visualizzato o se è nascosto 

310-320: setta i colori, il modo grafico e il clock 

330: traccia la prima linea; la variabile SP determina il passo del 

reticolo 


340-370: cicli che determinano e disegnano il grafico vero e 

proprio, punto per punto 

380: attesa pressione di un tasto 

390: routine "intrappola errori"! 

400: questa linea contiene la funzione da elaborare. Il valore di Z3 
viene calcolato in base a X3 e Y3 

420-430: per ogni colonna dello schermo viene determinato il 

valore minimo e massimo della funzione, valori immagazzinati in 

una zona della memoria a partire dalla locazione 5504 

440: se il valore di Y2 (altezza del punto) non soddisfa le condizioni 

precedenti, ritorna senza disegnarlo 

450: memorizza il valore minimo della colonna 

460: disegna il punto e ritorna 

470-565: menu 

570-580: visualizza il grafico 

590-710: SAVE pagina grafica 

720-770: LOAD pagina grafica 

780: fine, cancella schermo e azzera le variabili. 



0 SCNCLRSPRINT-DEVI CARICARE UNA PAGINA 
GRAFICA S/N" 

1 GETA*:IFA*=■"THEN1 

2 IFAS="S"THENGOTO 465 

3 IFA*="N"THENGOTO 10 
10 COLORO,1SCOLOR4,1 

20 DOUNT ILJ *6 sREADA*:AS=■ "♦AS: 

PRINT‘J4MnHHr : J=J4 1 
30 C0L0R5,13JPRINTA*:GOSUB160 
40 C0L0R5,16:PRINT"□"AS:GOSUB160 
50 C0L0R5,2 s PRINT"O^AS:GOSUB170 ! IFJ=10RJ 
=4THENGOSUB170 

60 C0L0R5.16:PRI NT” □*• AS :GOSUB160 
70 C0L0R5,13 :PRINT"□”AS:GOSUB160 
80 C0L0R5,12SPR INT •'□“AS: GOSUB 160 
90 LOOP :SCNCLR:COLOR5,2 s GOTO 180 


100 

DATA 

" 

*************t*♦ 

110 

DATA 

" 

AICREA PETRICONI 

120 

DATA 

■ 

PRESENTA 

130 

DATA 

" 

IPERGRAPHIC 3D 

140 

DATA 

“ 

<C> 1988 

150 

DATA 

" 

**************** 


160 SLEEP.5:RETURN 
170 SLEEP2:RETURN 
180 SCNCLR 

190 CHAR1,12.2."IPER GRAPHIC 30",1 
200 CHAR1.10.5."BY ANDREA PETRICONI",1 
210 SLEEP2 

220 KEY3, "GOTO290"4CHRS< 13) 

230 SCNCLR:FORK=0TO79SPRINT" "s:NEXTK 
240 PR 1NT " HHfl] PER GRAPHIC 3D" 

260 PR INT"*INSER IRE LA FUNZ IOf>E DESIDERA 
TA":LIST400 

270 PRINT naca E premere di seguito RETU 
rn e ar 
280 E re 

290 PR INTTAB < 16 ) TEMO I " : POKE56 .2 • 

1 :P0KE55,128:CLR:TRAP390 
300 FORI=0TO319:POKE5504 + I ,0:POKE5824+I , 

193 :NEXT 

310 COLORO, 1 SCOLORI ,2:C0L0R4,1sGRAPHICl , 

1 


320 FAST 

330 .X3«-2:F0RY3--2T02STEP.02 :GOSUB400: NE 
XTSSP*.3 

340 FORX3=-2T02STEP.02SY3*-2 :GOSUB400:Y3 
=2 :GOSUB400:RX=X3-INT<X3/SP)*SP 
350 FORY3»-2♦RXT02STEPSP:GOSUB400: hCXTY3 

360 FORY3=2-RXTO-2STEP-SF:GOSUB400:NEXTY 
3:nextx3 

370 X3=2:F0RY3*-2T02STEP.02 :GOSUB4O0:NEX 
TY3:SLOWS FORII=0TO25:GRAPHIC2,0,II:F 
ORLL* 1T038:NEXTLL:NEXTI I 
380 PRINT:GETKEYAS: GOTO4 70 
390 GRAPH1C0SSLOWSPRINT"*: ’E' STATO UN a 
"ERRS<ER)“ ALLA LINEA "EL:HELP : END 
400 Z3=1-SIN<X3>-1-C0S<Y3) 

410 X2=160 4 <Y34X3/2)*49:Y2=100 + (Z3+X3/2) 

*49 

420 1FY2 >PEEK +X? •» 1HEMPQKE5504 *X2 . Y2 

:GOTO450 

430 IFY2<PEEK<58244X2)THENP0KE5324 «X2.Y2 
:GOTO460 
440 RETURN 

450 IFY2<PEEK<58244X2)THENP0KE58244X2,Y2 

460 ORAW1,X2.199-Y2:RETURN 
465 GRAPHIC1 , 1 :GRAPHICO 
470 GRAPHIC0:SCNCLR 

480 PRINT”aai* VUOI VEDERE IL GRAFICO." 
430 PRINT-nae* VUOI SALVARE la pagina gr 
AFICA. “ 

500 PRINT-BB3S VUOI CARICARE LA PAGINA G 
RAF ICA." 

510 PR1NTINSERIRE FUNZIOhC.’ 

515 PRINT”*^* F Iht. " 

520 GETA*:IFAS*""THEN520 
530 IFAS="1"THEN570 
540 IF AS = *2 *' THEN590 
550 IFAS =“3"THEN720 
560 1FAS="4"THENI 80 
565 IFAS="5 "THEN780 

570 FORI I=0TO25SGRAPHIC2.0.11:FORLL=lT03 
8 :NEXTLL:NEXTII:PRINT"*" :GETKEYAS 


580 FORI I=25TO0STEP- 1 :GRAPHIC2,0, II :FORL 
L = 1T038 : NEXTLL : NEXT I I : GRAPH IC0 s G0T04 
70 

590 GRAPHIC0:SCNCLR:PRINT" 35AVE PAGINA G 
RAF ICA." 

600 PR INT " MBBJS I IL: 9p*6 I STRATORE O IL 
«RIVE ?" 

610 GETA*:IFAS*""THEN610 

620 IFA*="R"THENRR*1 

630 IFAS*"0"THENRR=8 

640 INPUT"JHOME DEL GRAF ICO " ; NOS 

650 IFRR =1THENPRINT"PREMI & 1■" 

660 IFRR=8THENPR If4T"PREM I ^2*" 

670 KEY1 , "S " 4CHR*< 34 ) 4N0*4CHR*< 34 ) 4 •• ,1,2 
140 ,3F41"+CHRS<13) 

680 KEY2 , "S" 4CHR*<34 )4r-IO*4CHR*<34 >4" ,8,2 
140 , 3F41"4CHR*<13) 

690 PRINT-**aaJ.B. AL TERMINE DELL'OPERA 
ZlOfC OI SALVATAGGIO PREMI " 

700 KEY4,"X"+CHR*<13)4-GOTO470■4CHR*<13) 

710 MONITOR 

720 GRAPH IC 1 : SCNCLR : GRAPH IC0 : PR I NT " LIM. nA 
O PAGir<IA GRAFICA." 

721 PR INT "■USI IL *?S1G1 STRATORE O IL a 
DRIVE ?" 

722 GETA*:1FA**""THEN722 

723 IFA*="R"THEN R*1 

724 1FA*="D"THEN R=8 

725 INPUT “ at^lME DEL FILE " ; NO* 

726 IFR = 1 THEN PR1NT-*»REM1 SF7«" 

727 IFR=8 THEN PRINT"* S REMI *^38" 

728 KEY7,"L"4CHR*<34)4N0*4CHR*<34)4",1 -♦ 
CHR*<13)S KEY8,"L"*CHR*<34)+NO* + CHR*< 
34)4-,8"4CHR*<13) 

750 PRINT"*v|.B. AL TERMINE DEL CARICAMEN 
TO DELLA PAGINA GRAFICA PREMI 3BI. " 

760 KEY4,"X"4CHR*<13)4"GOT0470"4CHR*<13) 

770 fiONITOR A 

780 SCNCLR:CLR:EtC 
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Commodore 

Ecco anche in versione “commodo- 
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di GIAN PIERO ROSI nana” un classico gioco di abilità, pazienza e intelligenza 

Frammenti 


piegare il funzionamento di questo gioco è piuttosto 
semplice: dei frammenti di varie forme cadono all’in- 
terno di una scatola, posizionandosi sul fondo. 

Il vostro compito è di guidarli verso destra o verso si¬ 
nistra (con i tasti e “:") e di farli ruotare (con il 
tasto “A"), in modo che la loro posizione favorisca il formarsi di li¬ 
nee orizzontali continue, senza “buchi”. 

Ogni volta che i frammenti riempiranno una linea orizzontale com¬ 
pletamente, questa linea scpmparirà facendo scendere di una riga 
tutto ciò che si trovava sopra. 

Si creerà quindi uno spazio maggiore per posizionare ulteriori 
frammenti, e questo produrrà due effetti positivi: infatti per ogni 


frammento posizionato viene incrementato il punteggio di dieci 
unità, e per ogni linea completata si avrà diritto ad un BONUS di 
200 punti. 

È possibile scegliere fra tre differenti livelli di gioco: la differenza sta 
nella velocità con cui cadono i frammenti aH’interno della scatola. 
Tecnicamente, la maggior parte del programma è occupato da 
una lunga serie di controlli di collisione: tra un frammento e l’altro e 
tra un frammento e i bordi della scatola. 

È presente nel listato una breve routine in linguaggio macchina, 
necessaria allo scroll dei frammenti, quando viene eliminata una ri¬ 
ga orizzontale completa. Tutto questo per velocizzare l’operazione 
e migliorare l’effetto visivo. 



10 POKE53280,0 : P0KE53281,0 : PRI NT 1 11 71 " TRB < 1 
0)"MW RAMMENTI” 

20 PRINTTRBC10) ”--" INPUT 

" MHWD IFFI COL'TR ' <1,2 ,3 )"; V : V« < 3-V)*5 
0 

30 PR I NT " IT • Z$= " " •* FORI = 1T022 ’ Z$=Z$+ " X" : 

PRINTTfiB<9>" X" TRB <38 >"X" : NEXT 
40 PR INTTRB < 9 > Z$ : FOR I =0TO 10 •* RERDRf < I ) NE 
XT•FORI=0TO10•RERDBCI) NEXT 
50 PRINT"jsaJ W'TRB(32)”MLI :■ W" : 

FORI=0TO10 :RERBPU< I ) :NEXT 

60 i»rtr":*i hi ai hi Tnni% "*i mi m 

ii n ii ii 

, , 

ii 

70 DfìTfl "ni ni m ni nrmi". "w in n 

n ii ii ii ii 

, , 

30 DRTR "VI HI HI HI TTIir/'^I IMOT 

",2,1,1,1,2,0,1,1,2,0,0 

90 DRTR50,40,50,40,50, 40, 50,40,20,20,10 
100 80=0 :FORI=51200TO51294 :RERDR•POKEI,R 
:SO=SO+fì'NEXT 

110 IFSOO15052THENPRINT".TERRORE NEI BRT 
R" END 

120 DIM RC21,23) ; FORI=0TO21 : R<I,0)=1 : 8(0 
,I)=l RC21,I)=1 NEXT-M=0 PU=0 LI*0 
130 X=10:V=22 PRINT"Hr 
140 IFIK19THENP=INT < RND<1> *11> : GOTO170 
150 IFMC21THENP=9 : GOTO170 
160 GOTO1450 

170 R=P^ X0=X:PRINTTRB ( X+9)"J”Rf < P >” S" ; 
130 FORI=0TOV : NEXT 
190 IFPEEK<198 »1THENPOKE<198),1 
200 : 

210 GETQ$: IFQ$=“"THEN970 
220 IFQfO"R"THEN460 

230 ONP+1GQTO240,260,280,300,320,340,360 
,380,410,430,970 

240 IFR CX+3,V-1)ORR <X+3,V-2> ORR < X,V-2)OR 
fl(X+1,V-1> THEN970 


250 GOTO390 

260 IFR < X+1,V> ORR < X+1,V-1)ORR < X+1,V-3> OR 
fì(X+2,V-3)THEN970 
270 GOTO390 

280 IFRCX,V-l>ORR(X,V-2)0RR(X+2,V-l>ORR< 
X+3,V-1)THEN970 
290 GOTO390 

300 IFR ( X+1,V)ORR < X+2,V)ORR <X+2,V-2)ORR< 
X+2,V-3)THEN978 
310 GOTO390 
320 IFR(X+1,V)THEN970 
330 GOTO390 

340 IFR(X+2,V-l)THEN970 
350 GOTO390 

360 IFR(X+1,V-2)THEN970 

370 GOTO390 

380 IFR(X,V-l)THEN970 

390 P=P+2-IFP=80RP=9THENP=P-8 

400 GOTO970 

410 IFRCX,V-l>0RRCX+2,V-l)0RRCX+3,V-l)TH 
EN970 

420 GOTO440 

430 IFR<X+1, V)ORR(X+1,V-2>ORR<X+1,V-3)TH 
EN970 

440 P=P+1:1FP=10THENP=8 
450 GOTO970 
460 IFQ$=""THFN490 
470 IFQ$=” : "THEN740 
480 GOTO970 

490 0NP+1G0T0510,530,550,570,590,610,630 
,650,670,690,710 

500 

510 IFR <X+3,V)ORR < X+3,V-1)ORR <X+3,V-2)OR 
R < X+3, V-3 ) THEN970 
520 GOTO730 

530 IFR<X+3,V-1)ORR(X+2,V-2)THEN970 
540 GOT0730 

550 IFRCX+4,V-l « ORR < X+4,V-2 > THEN970 
560 GQTO730 

570 IFRCX+2,V)ORR(X+2,V-l)ORR<X+2,V-2)TH 
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EN970 

580 GOTO730 

590 IFR CX+2,V> ORR CX+2 , V-1) ORR <X+2,V-2)OR 
R C X+3 ,V-3) THEN970 
600 GOTO730 

610 IFRCX+2,V)ORR C X+3, V-1>THEN970 
620 G0T0738 

630 IFR CX+1,V-2 )ORRC X+4,V-1) THEN970 
640 GOTO730 

650 IFR < X+2 ,V)ORRCX+3,V-1)ORR CX+2,V-2)TH 
EN970 

660 GOTO730 

670 IFR<X+2,V)ORR < X+2,V-1>ORR <X+2,V-2 > OR 
R C X+2 , V-3)THEN970 
680 GOTO730 

690 IFR <X+4 , V-1 ) THEN970 
700 GOTO730 

710 IFR(X+2,V )ORR(X+2,V-1)THEN970 
720 ^ 

730 X=X+1 GOTO970 

740 ONP+1GOTO750,770,790,810,830,850,870 
,890,910,930,950 

750 IFR < X,V>ORR<X+1,V-1) ORR <X+1,V-2)ORRC 
X+1,V-3 ) THEN970 
760 GOTO960 

770 IFR <X-1,V-1> ORR CX,V-2 >THEN970 
780 GOTO960 

790 IFR(X+2,V-1)ORR<X-1,V-2)THEN970 
800 GOTO960 

81* IFRCX,V)ORRCX-l,V-l)ORRCX,V-2)THEN97 
0 

820 GOTO960 

830 IFRCX,V)ORRCX,V-l)ORACX,V-2)0RACX,V- 
3>THEN970 
840 GOTO960 

850 IFR C X,V)ORR C X-1,V-1) THEN970 
860 GOTO960 

870 IFR C X-1,V-1)ORR C X-1,V-2 > THEN970 
380 GOTO960 

890 IFRCX,V)ORRCX,V-l>ORACX,V-2)THEN970 
900 GOTQ960 

910 IFRCX,V)ORRCX,V-l)ORRCX,V-2)ORACX,V- 
3)THEN970 
920 GOTO960 

930 IFRCX-1,V-l)THEN970 
940 GOTO960 

950 IFRCX-1, V)ORACX-l,V-l)THEN970 
960 X=X-1 GOTO970 

970 ONP+1GOTO930,1000,1020,1040,1060,108 
0,1100,1120,1140,1160,1180 
980 IFR <X+1,V-1)ORR C X+2,V-4)THEN1230 
990 GOTO1200 

1000 IFRCX,V-2)0RRCX+1,V-3)0RR(X+2,V-2)T 
HEN1240 
1010 GOTO1200 

1020 IFRCX,V-3)QRACX+1,V-3)0RRCX+2,V-3)0 
RACX+3,V-3)THEN1250 
1030 GOTO1200 

1040 IFRCX,V-2)0RRCX+1,V-3)THEN1260 
1050 GOTO1200 

1060 IFR C X+1,V-4 > ORR C X+2,V-4)THEN1270 
1070 GOTO1200 

1080 IFRCX,V-2)0RRCX+1,V-2)0RRCX+2,V-2)T 
HEN1280 
1090 GOTO1200 


TT00 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 


1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 


1440 

1450 


1460 

1470 


1480 


1490 


1500 


1510 


IFRCX,V-3)0RRCX+1,V-2)0RRCX+2,V-2>0 

RRCX+3,V-2)THEN1290 
GOTO1200 

IFR C X+1,V-3)ORR C X+2,V-2)THEN1300 
GOTO1200 

IFRCX+1,V-4)THEN1310 
GOTO1200 

IFRCX,V-2)0RRCX+1,V-2)0RRCX+2,V-2)0 
RRCX+3,V-2)THEN1320 
GOTO1200 

IFRCX,V-2)0RRCX+1,V-2)THEN1330 


V=V-1 

PRINTTABCX0+9)A*CR) GOTO170 

RCX+l,V)=l : F0RI»V-3T0V : RCX+2,I) S 1 : N 
EXT-GOTO1340 

RCX+l,V-2)*l•F0RI=XT0X+2 RCI,V-l)«1 
NEXT:GOTO1340 

RCX+3,V-l)=1:F0RI=XT0X+3 : RCI,Y-2)*l 
: NEXT GOTO1340 

RCX,V-l)=1:F0RI=V-2T0V RCX+l,I)*1 : N 
EXT GOTO1340 

RCX+2,V-3)=l F0RI=V-3T0V RCX+l,I)«l 
: NEXT : GOTO1340 

RCX+l,V)*l F0RI-XT0X+2 ; RCI,V-1>*1*N 
EXT:GOTO1340 

RCX,V-2)«l : F0RI s XTOX+3 : RCI,V-l)*1 : N 
EXT GOTO1340 

RCX+2,V-l)»1:F0RI=V-2T0V:RCX+l,I)*1 
NEXT GOTO1340 

F0RI=V-3T0V : RCX+l , n=l : NEXT • GOTO 134 
0 

F0RI*XT0X+3:RCI,V-l)=1 : NEXT:G0T0134 
0 

RCX, V>*1 :RCX+l, V)*l :RCX, V-l)*l •' RCX+ 

1,V-1)=1 

IFV>MTHENM*V 

PRINTTRBC X0+9> flf CR)".T :PRINTTRBC X+9 
) " ST'fìf CP) 

F OR I =V-B C P ) -1TOV 

L=0 : FORJ=1TO20 IFRC.J, I )THENL=L+1 

NEXTJ:IFL=20THENLI=LI+1 GOTO1400 

NEXTI PIJ=PU+PUCP) PRINT M WTTRBC4)P 

UTRBC35)LI GOTO130 

POKE51000,1 :SVS51272:PU*PU+200 

P0KE214,23•PRINT :PRINTTRBC 9)" «BONUS 

« LINER COMPLETATA" 

FORVV=ITOM :FORXX=1T020 A C XX,VV)=A C X 

X,VV+1) : NEXT XX,VV 

FORXX e 1TO20 R C XX,21)=0 :NEXT PRINTTR 

BC9) " 51" : GOTO 

1370 

P0KE214,23 :PRINT :PRINTTRBC10)" «UN 'A 
LTRR PRRTITR" ; : INPUTFf : IFF$0"N ,, THE 
NRUN 

PRINT'LT END 

DRTR174,56,199,56,165,251,233,40,17 
6,2,198,252,202,208,247,133,251,133 
,253 

DRTR166,252,134,254,24,105,40,144,2 
,230,254,133,253,234,174,56,199,160 
,20 

DRTR177,251,145,253,136,208,249,232 
,224,23,240,20,165,252,133,254,165, 
251 

DATA133,253,56,233,40,176,2,198,252 
,133,251,76,36,200,96,234,169,121,1 
33 

DRTR251,169,7,133,252,32,0,200,169, 
121,133,251,169,219,133,252,32,0,20 
0,96 
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Il gioco che vi proponiamo si prefig - 
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di GIAN PIERO ROSI 



i questi tempi avere una buona memoria è sempre 
più importante, sia sul lavoro, che durante lo svolgi¬ 
mento dei nostri hobbies. Il gioco che in questo nu¬ 
mero vi proponiamo, speriamo servirà a rendere più 
viva la vostra memoria, tenendo desti riflessi e capa¬ 
cità visiva. Digitato il breve listatino, MEMO, e dato il RUN, apparirà 
una breve schermatina di presentazione e dopo la pressione del ta¬ 
sto FI, si avrà una piccola descrizione del gioco. Agendo di nuovo 
sul medesimo tasto, avrà inizio il gioco. 

PRIMO QUADRO 

Si presenta con quattro quadrati, posizionati in corrispondenza dei 
quattro punti cardinali, aH’interno dei quali appariranno delle lette¬ 
re in ordine casuale. 

Ponete attenzione aH'apparizione, perché poi si dovranno riscrive¬ 
re nelle caselle dove sono apparse, partendo dalla prima casella in 
alto e proseguendo in senso orario. Il punteggio verrà visualizzato 
alPinterno della casellina di forma rettangolare posta in basso a 
destra dello schermo e verrà incrementato di dieci in dieci per ogni 
sequenza indovinata. 

Arrivati ad un totale di 100 punti, si passerà alla seconda manche di 
gioco, dove ad ostacolarci il cammino, questa volta sarà l’aumento 
di velocità di apparizione delle lettere. Raggiunti i 200 punti totali, si 
passerà a giocare il secondo quadro. 

Attenzione però a non commettere errori, poiché si avranno a di¬ 
sposizione solamente 50 tentativi per portare a termine tutto il gio¬ 
co. Se provate a fare i conti vi accorgerete che avrete la possibilità 
di fare al massimo 10 errori, altrimenti il gioco non verrà portato a 
termine. Ma vediamo il funzionamento del secondo quadro. 

SECONDO QUADRO 

Come già detto qualche linea sopra, per arrivare al secondo quadro 
bisogna aver raggiunto un totale di 200 punti, per portare a termine 
poi il medesimo. Questa volta il gioco si complica un pochino, lo po¬ 
tete notare dalla disposizione delle 8 caselle a video. Praticamente, 
lo scopo è quello di indovinare le parole di senso compiuto che ap¬ 
pariranno in senso anti orario dalla prima casella in alto a sinistra. 
Noi, come ne primo quadro, dovremo riscrivere la parola esatta in 
senso orario. Anche in questo caso, le regole del punteggio e delle 
possibilità di errore rimangono le stesse del primo quadro. Quindi 
non mi resta che augurarvi un buon divertimento con MEMO! 


ge lo scopo dì allenare la vostra memoria, sviluppando anche le 
capacità visive ed i riflessi 


NOTE TECNICHE PER IL PROGRAMMA 

Alla linea 60, seconda linea, sostituire la "J” con la combinazione di 
tasti SHIFT+J, le "C” con SHIFT+* e la ”K” con SHIFT + K. 

Lo stesso dicasi per la linea 62, seconda linea, sostituire le "C" con 
SHIFT+*. 


5 DIMPC50) 

10 PRINT" ITT ^ POKE53280,0 :P0KE53231/0 :A$= 
"RBCDEFGHILMNQPQRSTUVZ"■TP=350 : W=4 
20 X<1)=1?:V<1)=1:X<2>=26:V<2>=3:X<3>=17 
: Y<3)=15XC4)=8 : Y<4)=8 GOTO160 

30 REM-* DISEGNA QUADRO 

40 PRINT"!":POKE53280,0 : POKE53281,Q 
50 FORI=1TOW PRINT"3":FORH=1TOYCI>:PRINT 
:NEXTH 

60 PRINTTAB < X CI> > " ,--, filini I I filini 

I IJCCCK" : nexti 

61 PRINT"»" F0RI=1T019 PRINT^NEXT 

62 PR INTTABC23) " r --, filli inni I $ 

I K^CCCCCC- * 1 " 

70 POKE332P0,2 :P0KE53281,2 : RETURN 

80 REM -* LETTERE CASUALI *- 

90 FORI*1TO1000 : NEXT : FQRI = 1TOW:P<I ? = 1■NE 
XTI : K=0 ; F=0 : PRINT"!i7" 

100 R=INT<RNDCI)*W+1>: IFP<R>=OTHEN100 
110 PCR)=0 : K»K+1 : N=INTCRNDC1)#21+1) : LT$< 
R > =MIDICAl/N/1) : J$=LTf< R) 

120 PRINT"S8" F0RH=1T Y(R)+2 : PRINT : NEXTH 
130 F'RINTTABC XCR)+2)J1' IFF= 1THEN210 

132 IFF=2THEN250 

133 IFF=4THEN480 

135 FORI*0TOTP : NEXT : IFJIO" "THENJ$=" : 

GOTO120 

138 IFF=3THEN450 
140 IFKCWTHEN100 
150 RETURN 

160 GOSUB800 PRINT "nati ♦ ♦♦ ISTRU 

ZIONI ♦♦♦ ":PRINT 

161 PRINT"VEDRAI DELLE LETTERE CHE APPAR 
IRANNO" 

162 PRINT"DISORDINATAMENTE IN UNO SCHEMA 

CIR-" 

163 PRINT"COLARE. DOVRAI.RISCRIVERLE NEL 
LE CA-" 

164 PRINT "SELLE DOVE SONO APPARSE/ F'A 
RTENDO" 

165 PRINT"DALLA PRIMA CASELLA IN ALTO E 
PROSE-" 

166 PRINT"GUENDO IN SENSO ORARIO. CPRE 
MI FI)" 

167 GETV1 : IFVIOCHRIC 133>THEN167 
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168 PRINT" IT : GOSUB 30 

169 GOSUB 80 

170 F= 1 : VI =1 F 0 RR= 1 T 0 W 
180 GETJ$ ; IFJ$=""THEH 180 
190 IFJ*OLT*<R)THENVI =0 
200 GOTO 120 

210 NEXTF 

215 FRI NT " 8" '■ FORI = l TO20 : PR I NT NEXTI 
220 IFVI=0THENPRINT"HRI SBAGLIATO! " TEN 
=TEN+1 : GQTQ235 

230 PR I NT H GI USTO ! " PIJ=PU +10 : TEN=T 

EN +1 

235 IFTEN>50THEN1000 
240 F = 2 : J$=" " : FORR*lTOW*GOTO120 
250 NEXTR:PRINT" «" ■FORI = 1TO20:PRINT NEXT 
r FORI=ITO1000 NEXT 

260 PRINT" M ;:L=LEN(STR$C 

PU)> 

270 PRINTTRB< 31 -L )PU : IFG= 2 THEN 420 
280 IFPU< 100 THEN 169 
285 IFTP= 200 THEN 310 

290 PRINT"»" : FORI = 1 TO 20 : PRINT NEXTI PRIN 
T"BRRVO!":TP= 200 :PU *0 
300 PRINT" STRUMENTIAMO LR VELOCITA' ! F 
ORI« 0 TO 2000 NEXT•GOTO 168 
310 X< 1 )= 17 Y< 1 )= 1 : X( 3 )= 26 ; V< 3 )= 8 ; X< 5)=1 

7 V( 5 )= 15 : X< 7 )= 8 Y< 7)=8 

320 X< 2)=26 ^ V( 2 )=l : X< 4 >= 26 ; Y< 4 )= 15 :X< 6 )= 

8 ^ V( 6 )= 15 •X< 8 >« 8 :V( 8 )=l ; PU =0 

330 W= 8 •TP® 150 : 6=2 :PRINT" IT : POKE 53280,4 : 
P 0 KE 53281 , 0 

340 PRINT 1 '-* HRI SUPERRTO LR PRIMA PR 

RTE # •• ; PRINT" " 

341 PRINT"IMI ORR BEVI INDOVINARE LE PR 
ROLE" 

342 PRINT"IMW CHE SCRIVERÒ - ' CAPOVOLTE. 


343 PRINT")®®! <PREMI FI) " 

350 GETY$ : IFV$=""THEN350 
360 IFV$OCHR$ <133) THEN350 
400 PR I NT " 3" • GOSUB30 ; PR I NT " ,1" 

410 FORI=1TO50 ; PC I) = 1 NEXT 
420 IFPU=100THENTP=TP-20 
422 I FPIJ=200THEN700 

425 CS=INT <RNB<1)#50+1): IFP <CS)=0THEN420 

430 F=3•P<CS)=0 ; RESTORE : FORI=lTOCS:RERBQ 
t ■ NEXT I 

440 F0RR=8T01STEP-1 J$=MID$<Q$,R,1) : GOTO 
120 

450 NEXTR F=4-VI=1 
460 F0RR=1T08 
470 GETJf ; IFJ$=""THEN470 
475 GOTO120 

480 IF J*OM I D$ ( Q$, R, 1 ) THENVI =0 
490 NEXTR G0T0215 

600 DATA FARFALLA,LIMONRTR,TRVOLINO,CRRT 
ELLO,GELATINA,POLPETTA,POLTRONA 
610 DATA PERFIDIA,QUADRATO,VERONICA,PAST 
ELLO,COLLANTE,STAZIONE,SPERANZA 


620 

630 

640 

650 

660 

670 

700 

701 
710 
715 

720 

725 

730 

800 

805 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

1000 

1010 

1015 

1020 

1030 

1040 

1045 

1 050 

1055 

1060 

1065 

1070 

1080 

1090 

1100 

1110 


DATA FRATELLO,GIAGUARO,SPECCHIO,SPAV 
ALDO,SPAVENTO,STUDIOSO,RICERCHE 
DATA GIOCONDO,PETROLIO,FRUMENTO,PIET 
RNZE,TRAMONTO,PROVENTI,SCODELLA 
DATA DIOTTRIA,FRULLATO,TREMENDO,ADAT 
TATO,TAVOLATA,SERGENTE,MAESTRIA 
DATA COMPUTER,COLTELLO,TACCHINO,PENN 
ELLO,SCANDALO,CRUDELTÀ,SPORTIVO 
DATA CUCCIOLO,SPAZIOSO,FAVOLOSO,OTTA 
GONG,LUMINOSO,TEATRINO,VANI TOSO 
DATA CABINATO 

PRINT'T3i" F0RI = 1T014 : POKE53280,I:ROK 
E53281,1 + 1:F0RK=1TU100 :NEXTK:NEXTI 
FORI = 1T025 :PRINT :NEXTI 
PRINTTAB<12)" COMPLIMENTI ' " 

F0RI = 1T03:PRINT:FORJ=1TQ300•NEXTJ: NE 
XTI 

PRINTTAB<5)"HAI PORTATO A TERMINE IL 
GIOCO!! !" 


FOR I = 1TO30 : PR I NT : POKE53280,1 NT < I /2 ) •* 
FORJ= 1TO300 NEXTJ : N : XT I 


END 

PRINT“ fW" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 

PRINT" 


f i ~r 7 r~r t »~ t ? r t t r-r i r r > 

I I I I I I I I I I I I I I I I I I I 
I I I I I I I I I I ! I I I I I I I I 
H4 4 - H -H H H-f H i HH 

i i 

I M E M 0 V B I 


! I-- H H I PH f-f l +- H f- H 

i i-i i i i i t i i i t t i-t i i i i 


PRINTTAB< 8 ) "MSBV GIAN PIERO ROSI 
PR I NTT AB <13) " mmtFVEW I FI"" 


GETV* • IFY$=" "THEN930 


I FV$OCHR$ < 133 ) THEN930 


RETURN 

POKE53280,0 P0KE53281,0 PRINT"CJ" 
FORI = 1 T025 :PRINT :NEXT 


PRINTTAB<10)"# 


—#" 


PRINTTAB<10)"HAI EFFETTUATO IL MASS 
IMO" 

PRINTTAB<10)"DEI TENTATIVI CHE TI 
ERA" 

PRINTTAB<10)"CONCESSO...MI DISPIACE 

i » 


PRINTTAB<10)"#- 

“*■--# " 

FORI®1T010 PRINT FORJ=1TO300 : NEXTJ: 
NEXT I 

PR I NTT AB < 10 ) 

PR I NTT AB < 10 ) " S/UO I RI PROVARE?" < S/ 
N) " 

PRINTTAB <10)"" 

GETR$:IFR$=""THEN1070 
IFR$="S"THEN10 
IFR$="N"THENEND 
GOT 01070 

REM-** END **- 
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Ecco finalmente un programma che po¬ 


trà risolvere i problemi di tutti coloro che sono continuamente alle prese 


di FABRIZIO EMANUELE 


o scopo del programma è quello di convertire le mi¬ 
sure inglesi nel nostro sistema metrico decimale. 
All'inizio del programma, apparirà sullo schermo un 
menu dove sono raggruppati tutti i possibili tipi di 
conversione che ora vi elenchiamo: 

1) MISURE DI LUNGHEZZA 

2) MISURE DI SUPERFICIE 

3) MISURE DI VOLUME 

4) MISURE DI CAPACITA’ 

5) MISURE DI PESO 

6) MEDIA NUMERICA 

7) FINE PROGRAMMA 

Selezionando con i tasti numerici l'opzione desiderata, si entrerà in 
un nuovo menu dove verranno elencate le varie forme di equivalen¬ 
za. 

Nel caso della opzione numero 6 ci verrà richiesto il numero dei va¬ 
lori che vogliamo inserire, dopodiché potremo digitare i valori veri e 
propri di cui vogliamo calcolare la media. 


10 PRI NT " rj" • POKE 53280,0 P0KE53281,0 POK 
E646,10 

30 PR I NTTRB< 9 )" CONVERSI ONE - MISURE" 

40 PRINTTfìB(9>"MBV FRBRIZIO EMRNUELE" 

50 PRINTTfìB<6>"MW1 > - MISURE LUNGHEZZA" 

60 PRINTTAB(6)"2 > - MISURE SUPERFICIE" 
70 PRINTTAB(6)"3 ) - MISURE VOLUME" 

80 PRINTTAB(6)"4 > - MISURE CAPACITO'" 

90 PRINTTAB<6)"5 > - MISURE PESO" 

100 PRINTTAB(6)"6 > - MEDIA NUMERICA ' 

130 PRINTTfìB<6)"7 ) - FINE PROGRAMMA" 

140 PR I NTTfìB < 6 ) " JfWWlMICOSA SCEGLI ? " 

150 GETX* ; IFX$=""THEN150 
160 IFVAL(X*><1ORVAL<X$>>7THENG0T0150 
170 ON VAL(X$) GOTO 300,800,1100,1400,17 
00,200,2300 
180 GOTO150 
190 

194 rem m**+*mm+*m ******** 

196 REM *** MEDIA NUMERICA *** 

198 REM *MM*m************** 

199 • 

200 PR I NT " ZI" PR INTTAB (13) " MED IA NUMERICA 

a 

210 PRINT"HRPÌK2U ANTI NUMERI = : INPUTN : 

PRINT" JP" 

220 F0RA=1TON 


con le complicate misure inglesi 


Sue 


230 PRINT"<": A;") VALORE "; : INPUT B(A> 

235 NEXT 

240 SN=0 

250 FORA=lTON 

260 SN=SN+B(A > 

270 NEXT 

280 PRINT : PRINT">H_A MEDIA E' = ",SN/N 
283 PRINT"*»»**M*I2PREMI C C ] PER SCEG 
LIERE" 

285 GETX$ : IFX$=""THEN285 
287 IFX$="C"THEN10 
290 : 

293 REM ********* ********-m**** 

295 REM MISURE LUNGHEZZA *** 

297 rem 

299 : 

300 PR I NT " ZI" : PR I NTTAB< 10> " SMISURE DI LUN 
GHEZZA" 

315 PRINTTAB<6>"*M1 > - INCH IN CM" 

320 PRINTTAB(6)"2 > - FOCA IN METRI" 

330 FRINTTAB(6)"3 > - VARD IN METRI" 

340 PRINTTAB(6>"4 > - MIGLIA NORM. IN KM 

ii 

350 PRINTTAB(6>"5 ) - MIGLIA NAUT. IN KM 

ii 

360 PRINTTAB(6)"6 > - MENU" PRINCIPALE" 
390 PRINTTAB(3)" MCOSA SCEGLI ?" 

400 GETXf : IFX#=""THEN400 
405 IFVAL<X*K10RVAL<X*)>6 THEN400 
410 ON VAL<X$> GOTO 420,480,530,580,638, 
10 

415 GOTi’>400 
420 PRI NT "ZI" 

430 PRINTTfìB( 15) "31NCH IN CM«P" 

435 INPUT "ELIANTO VALE INCH = ",I 
440 A= I j^2. 54 

445 PR I NT " : I, " I NCH CORRISPONDONO " 

450 PRINT"A ";A," CENTIMETRI " 

455 PR I NT " MflB®ÌÌMÌÌl3PREM I C C ] PER SCE 
OLIERE" 

460 GETX$ IFX$=""THEN460 

461 IFX$="C"THENGOT0300 
470 GOTO300 

480 PR I NT " ZI" PR I NTT AB (13) " 3F DOT IN METRI 

M 

490 INPUT " .«GUANTO VALE FOOT = ";F 
495 B=F$.3048 

500 PRINT"W»I»»I ,, ;F; " FOOT CORRISPONDONO" 

505 PRINT"»IR ";B," METRI" 

510 PRINT" fMf>Ì»*Ì»»ISF’REMI C C J PER SCE 


Con version 
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OLIERE" 

515 GETXt : IFX$=""THEN515 

520 I FX$= " C " THEN300 

530 PRINTTflB< 13)"nsf/RRD IN METRI!" 

540 INPUT "«WBUANTO VRLE VARD = " ; V 
545 OV*.9144 

550 PRINT ,, MWMil ,, ;Y; " VRRD CORRISPONDONO" 

555 PRINT"fì ";C; M METRI" 

560 PRINT"SWOTMÌM»*3PREMI C C ] PER SC 
EGLIERE" 

565 GETX$ IFX$=""THEN565 
570 I FX$= 11 C " THEN300 

580 PRINTTRBC 10) 11 3911 GL IR NORMALI IN KM! 

ii 

590 INPUT"MHBURNTO VRLE MIGLIA N. = M ;MN 
595 D=MN*1.6093 

600 PRINT"M*D»M";MN; " MIGLIA N. CORRISPO 
NDONO" 

605 PRINT"A ";D;" KILOMETRI" 

610 PR I NT " HHMMMMW2PREM I C C ] PER SC 
EGLIERE" 

615 GETX$ IFX*=""THEN615 
620 IFXt="C"THEN300 

630 PRINTTABC9)'TWIIGLIR NAUTICHE IN KM! 

ii 

640 INPUT"WKIURNTO VRLE MIGLIA NR. = ";M 
S 

645 E=MS#1.8532 

658 PRINT II MNR9M >I ;MS; " MIGLIA NR. CORRISP 
ONDONO" 

655 PRINT"R ";E;" KILOMETRI" 

660 PRINT")IUm!MÌMÌKPREMI C C I PER SC 
EGLIERE" 

665 GETXf IFX$=""THEN665 
670 IFX$="C"THEN300 
750 

760 REM PPPPPPPPPPPPPPPPPPPPPPPPP 
770 REM *** MISURE SUPERFICIE **# 

780 REM 4!#****^#^#*******^###*4ì*# 

790 ^ 

800 PRINT"^" PRINTTRB(10>"SMISURE DI SUP 
ERFICIE" 

810 PRINTTRBC6)"MW1 > - INCH (QUAD.> IN 
CMCQURD. )" 

820 PRINTTAB<6>"2 > - FOOTCO) IN METRI<0 
>" 

830 PRINTTRB<6)"3 ) - VARDCO) IN METRI<0 
> " 

840 PRINTTRB(6)"4 > - MIGLIORO IN KMCG) 

ii 

850 PRINTTRB<6>"5 ) - MENU" PRINCIPALE" 
853 PRINT ,, WW«li»MM»»ICOSR SCEGLI ?" 

855 GETX$ IFX$=""THEN855 

860 IFVAL <X*) <1ORVAL(X$>>5THEN855 

865 ON VAL ( X$ ) GOTO 908.. 950, 1000, 1050, 10 

878 GOT08"5 

9G0 PRINTTAB< 13>"3SINCH<Q> IN CM<Q>!" 

905 INPUT"MWURNTO VRLE INCH Q. = ",IQ 
910 F=IQ$6.4516 

920 PRINT^tiEtiTOM”; IO; " INCH Q. CORRISPOND 
ONO" 

925 PRINT" R ";F;" CENTIMETRI 0." 


930 PRINT"WWW»*M»ÌÌiaPREMI C C ] PER SC 
EGLIERE" 

940 GETX$ : IF X$= ""THEN940 
945 IFX$="C"THEN800 

950 F'RINTTAB<9)"H2F00TCO) IN METRI(0)" 
960 INPUT"MWQURNTO VRLE FOOT Q. = ";F0 
965 G=FQ*.0929 

970 PRINT"*WW»M H ;FQ; " FOOT 0. CORRI SPOND 
ONO" 

975 PRINT" R ",0," METRI QUADRATI" 

988 PRINT":««i»»»ÌÌÌMI5PREMI C C I PFR SC¬ 
EGLIERE" 

985 GETX$ : IFX*=""THEN985 
990 IFX$="C"THEN800 

1000 PRINTTAB C 9 >"DSWRRD(0> IN METRICO)!" 

1010 INPUT "MMQURNTO VRLE VRRD Q. = ";V8 
1015 J=VQ$.8361 

1028 FRI NT " WttOil" ; VQ > " VRRD Q. CORRISPON 
DONO" 

1038 PRINT" R ";J;" METRI QUADRATI" 

1045 PRINT")MRIi»M!»Ì»lflPREMI C C ] PER S 
CEGLIERE" 

1047 GETXt ; IFX$=""THEN1047 

1049 IFX$="C"THEN800 

1050 PRINTTAB<9)"38MIGL10(Q> IN KMCQ)!" 
1068 INPUT "WIQUANTO VRLE MIGLIO Q. = ";M 

Q 

1065 K=MQ*2.59 

1075 PRINT"3flW>®H" ; M0; " MIGLIO Q. CORRISP 
ONDONO" 

1080 PRINT" R ";K;" KILOMETRI 0." 

1085 PRINT"fMif>M»MMItì PREMI [ C ] PER 
SCEGLIERE" 

1090 GETX*: IFX$=""THEN1090 

1094 I FX$= "C"THEN800 

1095 ■ 

1896 rem %%%**mm**x******m* 

1097 REM *** MISURE VOLUME *** 

1098 rem ***%*mm*m*****w*% 

1099 : 

1100 PRINT"3" PRINTTRB<12)"SI1ISURE DI VO 
LUME" 

1110 PRINTTAB<6)"WU > - INCH(C) IN CMCC 
)" 

1120 PRINTTRB(6)"2 > - FOOTCO IN METRI 

CO" 

1130 PRINTTRB(6)"3 ) - VRRDCO IN METRI 

CO" 

1140 PRINTTRB(6)"4 ) - MENU" PRINCIPALE" 

1150 GETX* IFX$=""THEN1150 
1160 IFVALC X$ ><1ORVALC X$)>4 THEN 1150 
1170 ON VAL<X$> GOTO 1200,1260,1310,10 
1180 GOTO1150 

1280 PR I NTT AB ( 12 ) " TISI NCH < C > IN CMC OH" 
1210 INPUT"WDURNTO VRLE INCH C. = ",IC 
1215 L=IC*16.387 

1220 PRINT"M»»»I";IC;" INCH C. CORRI SPON 
DONO" 

1230 PRINT" R ";L; " CENTIMETRI CUBICI" 
1240 PRINT":«B»»M»Ì»MISFREMI [ C ] PER S 
CEGLIERE" 

1245 GETXf^IFX$=""THEN1245 
1250 IFXf="C"THEN1100 

1260 PRINTTAB( 11)"H2F00TCO IN METRICO! 

ii 
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1270 INPUT "MHSUANTO VALE FQOT C. = M ;FC 
1275 M=FC#. 0283 

1280 PRINr'WWWiW'SFC; " FOOT C. CORRISPON 
DONO " 

1290 FRINT" fl ",*M;" METRI CUBICI" 

1295 PRINT ,, 3MWWiÌ»»M»WaPREMI C C ] PER S 
CEGLIERE" 

1300 GETX* : IFX*=""THEN1295 
1305 IFX*="C"THEN1100 

1310 PRINTTAB< 11 ) "ZlSfr'ARD< C> IN METRI<05 

ii 

1320 INPUT "MPQUfìNTO VALE VfìPD C. = ";VC 
1325 N=VC#.7646 

1330 PRINT ,, *WMi»r , ;VC;" VARO C. CORRI SPON 
DONO" 

1340 PRINT"A ";N;" METRI CUBICI" 

1350 PRINT".«tffi!«i»»*»»*iaPREMI C C 3 PER S 
CEGLIERE" 

1355 GETX* ; IFX*=""THEN1 355 
1360 IFX*="C"THEN1100 

1365 ■ 

1370 REM ####################### 

1380 REM *** MISURE CAPACITA *** 

1390 REM ####################### 

1399 ; 

1400 PRINT " 3" '■ PRINTTAB< 10) " 2WISURE DI CA 
PACITA " 

1410 PRINTTABC6 * 11 mi > - FINTE IN LITRI" 

1420 PRINTTABC6)"2 > - QUARTI IN LITRI" 
1430 FRI NTTABC6> "3 > - GALLONI IN LITRI" 

1450 FRI NTTAB (6) "4 > - MENU-' PRINCIPALE" 

1 453 PR I NTTAB <6 > " «CHI OSA SCEGL I ? " 

1455 GETX* •IFX*=""THEN1 455 
1460 IFVAL < X* > 10RVAL. < X * >> 4 THEN 1455 
1465 UN VAL<X*> GOTO 1480,1540,1600,IO 
1470 GOTO1455. 

I486 PRI NTT AB U SOSPINTE IN LITRI"" 

1490 INPUT "MWOUANTO VALE FINTE = " ; TE 
1495 0=TE#. 5682 

1500 PR I NT " mt» il" ; TE ; " PINTE CORRI SPONDO 
NO" 

1510 PRINT" A ",0," LITRI" 

«520 PRINT":*!l«i!>»iÌ»Ì»»lr4F*REMI C C 3 PER S 
CEGLIERE" 

1525 GETX* IFX*=""THEN1525 

1 530 IFX* -"C"THEN1400 

1540 PR I NTT AB < 1 2 > " HSKPUfìRT I IN LITRI"" 

1550 INPUT" m?U ANTO VALE QUARTI = ",TI 

1555 X=TI*1.1365 

1560 PRINT"MW»»r , J :TI;" QUART CORRISPONDO 
NO" 

1570 PRINT" A ";X; M LITRI" 

1580 PRINT"«!M»>Ì»»»»*ÌISF*REMI C C 3 PER S 
CEGLIERE" 

1585 GETX*•IFX*=""THEN1585 

1590 IFX*="C"THEN1400 

1600 PR I NTTAB a 2 >" GALLONI IN LITRI"" 

1610 INPUT 1 "MWEIUANTO VALE GALLONI « ",NI 

1615 W=NI#4.56 

1628 PRINT'VWWWH^NI;" GALLONI CORRI SPON 
DONO" 

1630 PRINT" A ",W," LITRI" 

1640 PRINT l< MNH>BiBÌMMflPREMI C C 3 PER S 
CEGLIERE" 


1645 GETX* IFX*=""THEN1645 

1650 IFX**"C"THEN1400 

1660 

1670 REM ################### 

1675 REM #** MISURE PESO ##* 

1680 REM ******************* 

1690 

1700 PRINT"3" : PRINTTAB< 1 3> " SMISURE DI PE 

SO" 

1710 PRINTTAB<6> "WW1 > - DRAMMA IN GRAMM 
I" 

1720 PRINTTAB<6>" 2 > - ONCIE IN GRAMMI" 
1730 PR I NTT AB (. 6 > " 3 > - LIBBRE IN KILI" 
1740 PR I NTT AB 6 > " 4 > - STONE IN KILI" 
1750 PRINTTABC6)"5 > - MENU *' PRINCIPALE" 

1760 PR I NTTAB<6 > " JfflMWCOSA SCEGL I ? " 
1770- GETX*•IFX*=""THEN1 770 
1780 I F VAL < X*> < 1ORVAL(X* )>5 THEN 1770 
1790 ON VAL < X* > GOTO 1300, 1880,I960,2020 
,10 

1795 GOTO 1770 

1800 PRINTTABa 2> "DRAMME IN GRAMMI"" 
1810 INPUT "GUANTO VALE DRAMMA = ", MA 
1820 V=MA#1.7718 

1830 PR I NT " JfflffltMMr ; MA ; " DRAMME CORR ISP 
ONDANO" 

1340 PRINT" A ";V; " GRAMMI " • . 

1850 PRINT"WWW»BM»ii*ÌiaPREMI C G 3 PER S 
CEGLIERE" 

1860 GETX* : IFX*=""THEN1860 

1870 1FX*="C"THEN1700 

1880 PRINTTABa2)"3SDNCIE IN GRAMMI"" 

1890 INPUT"WW3UANT0 VALE ONCIA = ",IA 

1900 Z=IA#28.3495 

1920 PRINT" A ";Z;" GRAMMI" 

1930 PRINT ,, WKW»B»M*BHPREMI C C 3 PER S 
CEGLIERE" 

1940 GETX*•IFX*=""THEN1940 

1950 IFX*=" C" THEN1700 

I960 PRiNTTAB< 1 3 >"32LIBBRE IN KILI"" 

1970 INPUT "WBUANTO VALE LIBBRA = " , RA 
1980 S=RA# .4536 

1990 PRINT ,, MWB»MH ,, ;RA;" LIBBRE CORRISPO 
NDONO" 

2000 PRINT" A KILI" 

2010 PRINT ll ]H»roiÌPMMÌIdPREriI L C 3 PER 
SCEGLIERE" 

2020 GETX* I FX*= ""THEN20-0 

2030 IFX*= "C" THEN2030 

2040 PRINTTAB (13) "73SJ3TONE IN KILI"" 

2050 INPUT"MMPUANTO VALE STONE = ",NE 
2060 T=NE#6.3503 

2070 PRINT"W«i!W*H".;NE; " STONE CORRI SPON 
DONO" 

2080 PRINT" A "; T ; " KILI" 

2090 PRINT"WWMi»»Ì»»»l* > REMI C C 3 PER S 
CELLIERE" 

2100 GETX* IFX*=""THEN2100 
2200 IFX*="C"THEN1700 

2300 PR I NT " IT • PR I NTTAB < 1 5 > " 'mmmWPRQQRft 
MM A " 

2310 PRINTTAB <15 >"TERMINATO " 

2320 PRINTTAB(16)"CIAO !•'" 

2330 PRINTTAB <1 8 >" DA" 

2340 PRINTTAB <12 >"MSFflBRIZ10 EMANUELE"" 
2450 FOR RR=1TO2000NEXT RR 
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I PROGRAMMI DI UST 


PER RICHIESTE VEDI 
“SERVIZIO PROGRAMMI ” 


COMMODORE 128 

LIST N 

AUTO DATA 

4/1987 

TERROR TERRAIN 

11/1987 



MERIDIANA 

5/1987 

FROGGY GO HOME 

'2198/ 

TECNO 

3/1987 

POLO NORD 

6-7/1987 

CHAR EDITOR 

12/1987 

EASY DATA 

5/1987 

TALKING SPECTRUM 

8-9/1987 

AUTOGRAPH 

1-2/1988 

AGENDA 128 

8-9/1987 

FAST LANDER 

10/198 

CHIMICA FACILE 

1-2 1988 

TUTTO DOS 

10/1987 

DEC HES 

10/1987 

MUSIC EDITOR 

3/1988 

GESTIONE MAGAZZINO 

11/1987 

HEARDLESS FILES 

11/1987 

SUPER DIRECTORY 

4/1988 

ELEMENTI DI CHIMICA 

12/1987 

DEC BIN CONVERTER 

11/1987 

RIDUZIONE SISTEMI 

4/1968 

CALCOLATRICE 

12/1987 

INVADE RS 

12/1987 

GESTIONE MAGAZZINO 

5/1988 

CROSS OVER 

12/1987 

THE SCREENS 

1-2/1988 

PRETTY PRINTER 

5/1988 

ARCHIVIO FORNITORI 

3/1988 

METEOR STORM 

3-1988 

OTHELLO 

5/1988 

GEOMETRIA 

6/1988 

UDG 

4/1988 

RIUNISCI LA MUSICA 

6/1988 

EASY DISK 

10/1988 

SCR LOAD - SCR SAVE 

5/1988 

CACCIA ALLE LETTERE 

6/1988 

GIOCO DEL LOTTO 

10/1988 

STRUTTURA DELL'ATOMO 

6/1988 

DISASSEMBLER 

6/1988 

DISK UTILITY 

11/1988 



MENU 

7-8/1988 

THE BIG CHARS 

12/1988 

OLIVETTI PRODEST PC 128 

LIST N 

DECOR EDITOR 

KEYWORD ESTENSION 

7-8/1988 





7-8/1988 

COMMODORE 64-128 

UST N 

QUARKSTYLE 

1/1987 

FUNZIONI 3D 

9/1988 



ALFABETO PAZZO 

2/1987 

CALENDARIO PERP 

9 '988 

ASTON 64 TITOLAT 

3/1966 

SEMPLIFICAZIONE DI FRAZ 

3/1987 

RAINBOW 

9/1988 

CATALOGO PROGRAMMI 

4/1986 

OTHELLO 

4/1987 

MERGE 

10/1968 

SUPERUTILITY 

5-6/1986 

MEMORY 

4/1987 

CATALOGO 

10 1988 

NOTE DIRECTORY 

9/1986 

IL VIAGGIOSCOPIO 

5/1987 

LUCKY WHEEL 

10/1988 

CALCOLO DEGLI INTERESSI 

3/1987 

BOMBER 

6-7/1987 

ANTIFURTO 

11/1988 

GHOSTS 

4/1987 

OLI 3D 

8-9/1987 

PRED PRINT 

11/1988 

BRISCOLA 

4/1987 

PIE CHART 

10/1987 

GESTIONE BIBLIOTECA 

11/1988 

SISTEMA SOLARE 

6-7/1987 

SOUIGGLE 

11/1987 

STARLANE 

12/1988 

AUTOSPRITE 

8-9/1987 

ASTEROIDI 

11/1987 

SETTE E MEZZO 

12/1988 

VIDEO CRONOMETRO 

8-9/1987 

RIDUZIONE DI SISTEMI 

1-2/1988 

POKER 

12/1988 

MULTITASK 64 

10/1987 

CARTON CREATOR 

1-2/1988 

LA STANGATA 

1-2/1989 

CRAYON 

10/1987 

THE MAZE 

1-2/1988 

MERGE 1.1 

1-2/1989 

PUZZLE 

10/1987 

SISTEMI LINEARI 

3/1988 

SCANNER 

1-2/1989 

JUMP 3D 

11/1987 

GRID 

3/1988 

PROMMER 

3/1989 

IL MUSICHIERE 

12/1987 

COME TI POKO IL VIDEO 

4/1988 

GESTIONE CONTO CORRENTE 

3/1969 

VIDEO CRUCIVERBA 

12/1987 

OLISTORE (DATA BASE) 

4/1988 

CRAMER 

4/1969 

EASY CHAR 

1-2/1988 

CARACTERS SETS 

5/1988 

DOMINO 

4/1989 

TOTOCALCIO FACILE 

1-2/1988 

GRID RUN 

5/1988 

ALFA-SEO 

4 1989 

TELE BEAM 

3/1988 

CHARACTER EDITOR 

6/1988 



IL DISEGNA CARTE 

MEMOREX 

4/1988 

SISTEMA SOLARE 

6/1988 

PC COMP. MS-DOS 

UST N 

4/1988 

PIANOLA 

7-8/1988 



RISIKO 

4/1988 

MINILOGO 

7-8/1988 

MS-DOS CON IL BASIC 

1-2/1988 

ENCI QUIZ 

5/1988 

MONITOR 

9/1988 

TOTO 13 

41988 

TALK 64 

5/1988 

OLIEXPERT 

9/1988 

BIORITMO 

5/1988 

MEDICALC 

5/1988 

ELAB DI SPRITE 

9/1988 

SUPERGRAPHIC 

5/1988 

AGENDA 

5/1988 

STUDIO DI FUNZIONE 

10/1989 

MASTER MINO 

6/1988 

HYPER SPACE 

6/1988 

COME SI SUONA LA CHITARRA 10/1988 

EQUAZIONE DI 2° GRADO 

6/1988 

GIOCO DEL 21 

6/1988 

BATTLE 

10/1988 

AGENDA TELEFONICA 

7-8/1968 

MICRO L/M 

7-8/1988 

CAE - DISEGNO ELETTRONICO 11/1988 

MUSICA CON IL PC 

7-8-1988 

TEST RIFLESSI 

9/1988 

SOLUZIONE DI POLINOMI 

11/1988 

STUDIO DI FUNZIONI 

9 1988 

TOTORIDUTTORE 

10/1988 

CRAZY PICTURE 

11/1988 

SETTE NOIE 

10/1988 

ADVENTURE HOME 

12/1988 

SOUND SAMPLER 

12/1988 

CALCIO CLASSIFICA 

11/1988 

CACCIA GROSSA 

12/1988 

PROPORTIONAL 

12/1988 

WORD PROCESSOR 

12/1988 

SINONIMI 

12/1988 

DATAGEN 

1-2/1989 

BATTAGLIA TRA LE MONTAGNE 

1-2/1989 

SCHERMA 

1-2/1989 

BLACK JACK 

1-2/1989 

TOTOCALCIO 

1-2/1989 

SFIDA 

1-2/1989 

COPY FILE 

1-2/1989 

RISOLUZIONE SISTEMI 

3/1989 

EASY WORD 

1-2/1988 

SCREEN EDITOR 

3/1989 

RUOTA DENTATA 

3/1989 

LOVE GAME 

1-2/1989 

TOTORIDUZIONE 

3/1989 

SIMPLEX 

3/1989 

CAN CAN 

3/1989 

SALTO IN LUNGO 

3/1989 

RAMDISK INSTALLER 

4/1989 

POKER 

3/1989 

ISM 

4/1989 



AVVENTURA 

3/1989 

ESAB 

4/1989 



IL GIOCO DELLA MEMORIA 

4/1989 

NUOTO 

4/1989 



LE OTTO REGINE 

COPY 64 

4/1989 

4/1989 

BORDER 

4/1989 

PROGRAMMI SPECIALI 


SISTEMI SMX 

LIST N 

OLIVETTI PRODEST PC 128S 

UST N 



WINDOW EDITOR 

2/1987 

MSX 2 

LIST N 

DATA WRITER 

1-2/1986 

SPHEROGRAPH 

3/1987 



C/C BANCARIO 

10/1986 

OLICALC 

4/1987 

EFFETTI SPECIALI 

1-2/1989 

IL TECNIGRAFO 

1/1987 

CONTABILITA DOMESTICA 

5/1987 

XBASIC KUN 

3/1989 

L'INVENTA SPRITE 

3/1987 

AIR COMBAT 3D 

6-7/198/ 



ROTAZIONE 30 

AUTOPROG GRAFICO 

6-7/1987 

C/C BANCARIO 

6-7/1987 

OLIVETTI PRODEST PC 128 S 

LIST N 

10/198/ 

AGENDA TELEFONICA 

8-9/1987 



JOHNSON CONTRO LEWIS 

DOSSIER ASCII 

SPRITE DANCE 

ANIMARE COL VDP 

STAR WARS 

1-2/1988 

3/1988 

3/1988 

4/1988 

4/1988 

5/1988 

AGENDA APPUNTAMENTI 

10/1987 

OVERLAY ROUTINE 

4/1989 






GIOCHIAMO CON GLI ANIMALI 

5/1988 





SUMMIT USA-URSS 

5/1988 





MICROCARATTERI 

STAR WARS 2 

VAMPYR 

6/1988 

6/1988 

7-8/1988 

SERVIZIO PROGRAMMI 


ANGOLI 

7-8/1988 





PIANETA CHIRONE 

7-8/1988 





DRAKULA 

FAST FOOD 

10/1988 

10/1988 

1 programmi 

pubblicati in questo numero e nei precedenti di LIST, 

BOMB MAN 

CARATTERI TIPO RASTER 

11/1988 

11/1988 

sono 

disponibili registrati su cassetta o floppy disk. 


UTILITY IC0ME-MSX2 

CATCH 

11/1988 

12/1988 

1 lettori possono richiederli specificando il titolo e quale computer. 

TRIANGOLI 

COMPUTER RITRATTI 

ACQUARELLO 

12/1988 

12/1988 

1-2/1989 

Inviare, quale contributo spese, per ogni programma: 

Lire 10.000 su cassetta, Lire 12.000 su floppy disk da 5” 1/4 o 3,5 

1 

COPY SPRITE 

1-2/1989 





GHOST'N ZOMBIES 

OPTIX 

1-2/1989 

3/1989 

Per i 

programmi speciali il costo è di Lire 15.000 


ANIMAZIONE 3D 

3/1989 





GRAFICA 3D 

4/1989 


La richiesta deve essere fatta 


WORKSTATION COPY 

4/1989 


a mezzo vaglia postale indirizzato a: 


ZX SPECTRUM 

LIST N 









CAMP 1 

TOT 13 

1-2/1986 

3/1986 


(Ufficio postale Roma 80) 


DATA BASE 

IL TEST DELL AMORE 

4/1986 

10/1986 

oppure con assegno bancario N.T. in busta chiusa. 


ROULETTE 

12/1986 





ECLISSI LUNA 

3/1987 





















l gioielli della robotica 


ecco I «SS? 


cra\nler 


Questo roo 


È un r° D 
discbe^ 


program^- , nef o 
\\ bianco « « auUv 


Dove acquistarli? 

I ROBOTS MOVIT ILLUSTRATI SONO REPERIBILI IN QUESTI NEGOZI 



AOSTA • Mastro Geppetto, Via Croce di Città 73 • (0165)362174 

AREZZO - Giocalibro, Via Mecenate 35 - (0575)356357 

BARI - Libreria deH’Arca, Via dell'Arca 14 - (080)224212 

BARI - Pentalfa e Varianti, Piazza A. Moro 25/A • (080)369393 

BERGAMO • Bimbolegge Bimbogioca, Via Borfuro 12 B/C • (035)2130015 

BIELLA - Il talismano, Via Italia 45 - (015)22488 

BOLOGNA - Città del Sole, Strada Maggiore 17 * (051)266432 

BORGOSESIA - Erbavoglio, Via Roma 20 • (0163)25612 

BRESCIA - Barbanzè, Via Mazzini 24 - (030)57249 

BRESCIA - L’altro Barbanzè, Via Mazzini 20 - (030)57249 

BRINDISI • Città del Sole, Piazza Cairoli 36/37 ■ (0831)21146 

CATANIA - Cartolibreria dei Ragazzi, Viale Ionio 46 - (095)371725 

CATANIA ■ Coop Magia, Viale Ionio 46 - (095)371725 

CESENA - Libreria Bottini, Via Vescovado 5 - (0547)21634 

CHIETI • Games Centre, Centro Commerciale il Gialdo • (011)9478877 

CUNEO - Centro Gioco Educativo, Via Carlo Emanuele 7 - (0171)65600 

FAENZA - Città del Sole, Voltone della Molinella - (0546)21013 

FERRARA - Città del Sole, Via Contrari 40 • (0532)48816 

FIRENZE - Città del Soie, Borgo Ognissanti, 37 - (055)219345 


FOGGIA - Città del Sole, Via Valentini Vista 8 - (0881)21112 
IVREA ■ Didattica più, Via Guamotta 33 • (0125)40105 
LECCE - Città del Sole, Via B. Croce 16 - (0832)57934 
MATERA - Città del Sole, Via la Croce 8 - (0835)219430 
MILANO - Città del Sole, Via Dante 13 - (02)806068 
MILANO • I giochi dei grandi, Via Meravigli 7 * (02)8058991 
MODENA - Orsa Maggiore, Piazza Matteotti 20 • (059)211200 
MONZA • Città del Sole, Via Carlo Alberto 33 - (039)389885 
MORBEGNO - Città del Sole, Vicolo Colombo - (0342)613370 
NAPOLI - Città del Sole, Via Kerbaker 46 - (081)242764 
NOVARA • Dialoghi giochi, Corso Cavallotti 21 - (0161)57789 
ORISTANO - Didagiò, Vicolo Solferino 6 - (0783)73169 
PADOVA - Via S. Martino e Solferino 102 - (049)875315 
PALERMO - Città del Sole, Via Libertà 43 ■ (091)298799 
PAVIA - La cicogna, Via Omodeo 29/33 - (0382)25705 
PESCARA - Città del Sole, Viale Regina Margherita 30 - (085)295356 
PINEROLO - Centro Gioco Educativo, Via Lequio 58 - (0121)74084 
PORTOFERRAIO - 0-99 Giochi, Via Manganaro 52 - (0565)917906 
REGGIO EMILIA - Città del Sole, Via Franzoni 6/B 


ROMA - Città del Sole, Via della Scrofa 65 - (06)6875404 
S. BENEDETTO DEL TRONTO - Città del sole, Via Palestra 25 - (0735)2738 
SASSARI - Città del Sole, Va Usai 29/31 - (079)231095 
SAVIGLIANO - Centro Gioco Educativo, Via Mazzini 21/23 - (0172)33434 
SIENA • La nuova fabbrica dei sogni, Via Pantaneto 38 - (0577)285591 
TARANTO - Città del Sole, Via Nitti 57 - (099)24436 
TORINO - Centro Giochi Educativo, Via Cemaia 25 - (011)541776 
TORINO - Centro Giochi Educativo, Via Nizza 97 - (011)6698478 
TORINO - Centro Giochi Educativo, Corso Peschiera 160 - (011)389134 
TORINO - Games Centre, Centro Commerciale Lagrange 15 - (011)512576 
UDINE - Città del Sole, Piazza San Cristoforo 14 - (0432)208148 
VARESE - Città del Sole, Via Avegno 15 - (0332)234271 
VEN.MESTRE - Città del Sole, Via Palazzo 50 - (041)5053015 
VERCELLI - Dialoghi Giochi, Via G. Ferraris 53 - (0161)57789 
VERONA - Città del Sole, Via Cattaneo 8 - (045)59 1 761 

Prodotti in Giappone 
distribuiti in Italia da: 

Texim Italia s.r.l. - Via Flavio Stilicone, 111 
00175 - Roma - Tel. 7665495 


Clio 









Ivan Garzanti 



SOLO “BUONA” MUSICA! 


SAVONA 

VENEZIA 

VICENZA 

PADOVA 

BELLUNO 

VERONA 

UDINE 

GORIZIA 

PORDENONE 

BOLOGNA 

MODENA 

REGGIO EMILIA 

FERRARA 

FORLI 

PARMA 

PIACENZA 

RAVENNA 


Area ascolto: 


RIMINI 

Città e prov. 

frequenze 

FIRENZE 

MILANO 

101-101.200-98.700 

AREZZO 

BERGAMO 

101-101.200 

GROSSETO 

BRESCIA 

88.300-88.900 

LIVORNO 

COMO 

101-101.200 

LUCCA 

CREMONA 

101.200 

MASSA CARRARA 

MANTOVA 

88.300-101.200 

PISA 

PAVIA 

101-101.200 

PISTOIA 

SONDRIO 

100.500 

SIENA 

VARESE 

101-95.100 

RIETI 

TORINO 

91.100 

ROMA 

BIELLA-IVREA 

104.700 

VITERBO 

ALESSANDRIA 

101-101.200 

ANCONA 

NOVARA 

101-101.200 

PESARO-URBINO 

VFRCELLI 

101-101.200 

TERAMO 

GENOVA 

107.100(105.250 L - 

PESCARA 

IMPERIA 

107.100 

CHIETI 

SANREMO 

101.250-107.400 

PERUGIA 

VENTIMIGLIA 

101.250 

TERNI 

LA SPEZIA 

107.100-106 

SPOLETO 


107.100-105.250, 

106.900 

106.900 

106.900- 96.7C 

106.900- 107. 
88.700 

107.750 

107.750 

107.750 

107.900 

107.900 

107.900- 101 
101 

107.900- 107 
101 - 101.200 
101 - 101.200 

107.900-107 
107.000 
93.000 

93.000-92.750 
95.000 
95.150 

95.150- 105.Ì 
91.350-106. 

95.150- 105. 
93.000 
95.000-102> 
100.100 
90.100 
95.000-102. 
107.000 
107.000 

107.300 

107.300 

107.300 
93.000-95.000 
90.500 
90.500 


450 


RADIO MILANO INTERNATIONAL s.r.l. - Via Locatelli 6,20124 Milano (Italy) - Tel. (02) 6559221 r.a. - Telefax 6704900 





























